/[webwml]/newmaint/fddelete.wml
ViewVC logotype

Contents of /newmaint/fddelete.wml

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.5 - (show annotations) (download)
Sun Aug 14 19:16:26 2005 UTC (7 years, 9 months ago) by tbm
Branch: MAIN
CVS Tags: HEAD
Changes since 1.4: +4 -0 lines
add proper copyright headers.  This code is unser the GPL, version 2 or
higher.  Most of it has been written by Craig Small <csmall@debian.org> and
Martin Michlmayr <tbm@cyrius.com>, with some contributions from Peter
Palfrader <weasel@debian.org>, Ralf Treinen <treinen@debian.org> and
others.
1 # Copyright (C) 2001 Craig Small <csmall@debian.org>
2 # Copyright (C) 2001, 2002, 2003, 2004, 2005 Martin Michlmayr <tbm@cyrius.com>
3 # This file may be distributed under the GPL v2 or higher.
4
5 <?
6 session_start();
7 include("config.inc");
8 include("common.inc");
9
10 function delete_am($login) {
11 if (! ($db = open_db())) {
12 return FALSE;
13 }
14 $sql = "DELETE from manager WHERE login='$login'";
15 if (! ($query = pg_exec($db, $sql))) {
16 echo "Problem with query", pg_ErrorMessage($db), "<BR>";
17 echo "SQL was: $sql<BR>\n";
18 return FALSE;
19 }
20 return TRUE;
21 }
22 ?>
23 #use wml::nmpage title="Debian New Maintainer - Delete Application Manager"
24 <?
25 if (!session_is_registered("s_username") || !session_is_registered("s_isam") || !session_is_registered("s_isfd")) {
26 ?>
27 <STRONG>
28 You should not be here!</STRONG>
29 <? } else {
30 session_register("s_username");
31 session_register("s_isfd");
32 session_register("s_isdam");
33 $login = $_REQUEST['login'];
34 ?>
35 <H1>Debian New Maintainer Status</H1><BR>
36 <? if ($_SESSION['s_isfd'] == 't' && $login != "") { ?>
37 <H3>Deleting Application Manager</H3>
38 <?
39 if (delete_am($_REQUEST['login'])) {
40 ?>
41 <P>Successfully deleted <? echo $login; ?> from the list of managers.
42 <? } else { ?>
43 <P> Could not delete <? echo $login; ?> from list of managers.
44 <? } # check database query ?>
45 <? } else { #you are not a fd, go away ?>
46 <P>What are you doing here huh?
47 <? } } ?>

  ViewVC Help
Powered by ViewVC 1.1.5