egroupware_official/admin/deleteapplication.php
2001-05-11 13:26:46 +00:00

47 lines
1.7 KiB
PHP

<?php
/**************************************************************************\
* phpGroupWare - administration *
* http://www.phpgroupware.org *
* -------------------------------------------- *
* This program is free software; you can redistribute it and/or modify it *
* under the terms of the GNU General Public License as published by the *
* Free Software Foundation; either version 2 of the License, or (at your *
* option) any later version. *
\**************************************************************************/
/* $Id$ */
$phpgw_info['flags'] = array(
'noheader' => True,
'nonavbar' => True,
'currentapp' => 'admin'
);
if (!$app_name)
{
Header("Location: " . $phpgw->link('/admin/applications.php'));
}
include('../header.inc.php');
$p = CreateObject('phpgwapi.Template',PHPGW_APP_TPL);
$p->set_file(array('body' => 'delete_common.tpl'));
if ($confirm)
{
$phpgw->db->query("delete from phpgw_applications where app_name='$app_name'",__LINE__,__FILE__);
Header("Location: " . $phpgw->link('/admin/applications.php'));
$phpgw->common->phpgw_exit();
}
$phpgw->common->phpgw_header();
echo parse_navbar();
$p->set_var('messages',lang('Are you sure you want to delete this application ?'));
$p->set_var('no','<a href="' . $phpgw->link("/admin/applications.php") . '">' . lang('No') . '</a>');
$p->set_var('yes','<a href="' . $phpgw->link("/admin/deleteapplication.php","app_name=" . urlencode($app_name) . "&confirm=True") . '">' . lang('Yes') . '</a>');
$p->pparse('out','body');
$phpgw->common->phpgw_footer();
?>