Patch by holger@holger.om.org (Holger Schurig) -- put the fancy header on several...

diff --git a/CGI.pl b/CGI.pl
index bbc5863ede3de2438059ee7f6239525ad5681be0..c12ce8e5e7c83078700e57aa65b66daf112c1ac5 100644 (file)
--- a/CGI.pl
+++ b/CGI.pl
@@ -320,7 +320,7 @@ sub CheckEmailSyntax {
     if ($addr !~ /$match/) {
         print "Content-type: text/html\n\n";
 
-        print "<H1>Invalid e-mail address entered.</H1>\n";
+        PutHeader("Check e-mail syntax");
         print "The e-mail address you entered\n";
         print "(<b>$addr</b>) didn't match our minimal\n";
         print "syntax checking for a legal email address.\n";
@@ -358,7 +358,7 @@ To use the wonders of bugzilla, you can use the following:
     close SENDMAIL;
 
     print "Content-type: text/html\n\n";
-    print "<H1>Password has been emailed.</H1>\n";
+    PutHeader("Password mailed");
     print "The password for the e-mail address\n";
     print "$login has been e-mailed to that address.\n";
     print "<p>When the e-mail arrives, you can click <b>Back</b>\n";
@@ -427,7 +427,7 @@ sub confirm_login {
 
     if ($loginok != 1) {
         print "Content-type: text/html\n\n";
-        print "<H1>Please log in.</H1>\n";
+        PutHeader("Login");
         print "I need a legitimate e-mail address and password to continue.\n";
         if (!defined $nexturl || $nexturl eq "") {
            # Sets nexturl to be argv0, stripping everything up to and

diff --git a/colchange.cgi b/colchange.cgi
index 33d2dfe7057285361e9d9f40347858a95cf4c6d6..2dd1b350b8c26e53591d0703312d81dcf180ce01 100755 (executable)
--- a/colchange.cgi
+++ b/colchange.cgi
@@ -63,6 +63,7 @@ if (defined $::FORM{'rememberedquery'}) {
     print "Refresh: 0; URL=buglist.cgi?$::FORM{'rememberedquery'}\n";
     print "\n";
     print "<TITLE>What a hack.</TITLE>\n";
+    PutHeader ("Change columns");
     print "Resubmitting your query with new columns...\n";
     exit;
 }
@@ -84,6 +85,7 @@ $desc{'summaryfull'} = "Full Summary";
 
 
 print "\n";
+PutHeader ("Change columns");
 print "Check which columns you wish to appear on the list, and then click\n";
 print "on submit.\n";
 print "<p>\n";

diff --git a/long_list.cgi b/long_list.cgi
index 69546119fadb18947f4e4ae9aab276556be292e2..e855c44342277aa24d4d01187db00d6cb4f9f91a 100755 (executable)
--- a/long_list.cgi
+++ b/long_list.cgi
@@ -29,7 +29,7 @@ require "CGI.pl";
 use vars %::FORM;
 
 print "Content-type: text/html\n\n";
-print "<TITLE>Full Text Bug Listing</TITLE>\n";
+PutHeader ("Full Text Bug Listing");
 
 ConnectToDatabase();
 quietly_check_login();

diff --git a/process_bug.cgi b/process_bug.cgi
index 297a9ed77a20c336b30c92c3a220c273098207c7..aa168bd55d88c47ad63f6a5f0602174ba22f747f 100755 (executable)
--- a/process_bug.cgi
+++ b/process_bug.cgi
@@ -34,6 +34,8 @@ confirm_login();
 
 print "Content-type: text/html\n\n";
 
+PutHeader ("Bug processed");
+
 GetVersionTable();
 
 if ($::FORM{'product'} ne $::dontchange) {

diff --git a/relogin.cgi b/relogin.cgi
index d1e2700aa71c5ab8e0f577b82e4e0f361a2556fe..a62577ca6521a7c1ef473a68d8e27cdc07b3b768 100755 (executable)
--- a/relogin.cgi
+++ b/relogin.cgi
@@ -30,7 +30,10 @@ Set-Cookie: Bugzilla_logincookie= ; path=/; expires=Sun, 30-Jun-80 00:00:00 GMT
 Set-Cookie: Bugzilla_password= ; path=/; expires=Sun, 30-Jun-80 00:00:00 GMT
 Content-type: text/html
 
-<H1>Your login has been forgotten.</H1>
+";
+PutHeader ("Relogin");
+
+print "<B>Your login has been forgotten</B>.</P>
 The cookie that was remembering your login is now gone.  The next time you
 do an action that requires a login, you will be prompted for it.
 <p>