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

Contents of /newmaint/gpgmain.wml

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.4 - (show annotations) (download)
Sun Jul 15 00:18:40 2001 UTC (11 years, 10 months ago) by tbm
Branch: MAIN
Changes since 1.3: +1 -0 lines
actually get info
1 <?
2 session_start();
3 include("gpgconfig.inc");
4 include("common.inc");
5 include("gpgcommon.inc");
6
7 ?>
8 #use wml::gpgpage title="GPG Signing Coordination - Your profile"
9 <?
10 if (!session_is_registered("s_username")) {
11 ?>
12 <STRONG>
13 You should not be here!</STRONG>
14 <? } else {
15 session_register("s_username");
16 }
17 ?>
18
19 <?
20 if (($db = open_db())) {
21 $sql = "SELECT id, forename, surname FROM people WHERE email = '$s_username'";
22 if (! ($result = pg_exec($db, $sql))) {
23 echo "Problem with query", pg_ErrorMessage($db), "<BR>";
24 return FALSE;
25 }
26
27 if (pg_NumRows($result) != 1) {
28 echo "That e-mail address is wicked.";
29 return FALSE;
30 }
31
32 $row = pg_Fetch_Array($result, 0);
33 print_all_places($row["id"], TRUE);
34 }
35 ?>
36

  ViewVC Help
Powered by ViewVC 1.1.5