From 6b72609ec31778ea2b1bd1be6675263d72ec6ebd Mon Sep 17 00:00:00 2001 From: "slamm%netscape.com" Date: Thu, 22 Apr 1999 21:02:48 +0000 Subject: [PATCH] Remember the email address in a cookie. git-svn-id: svn://10.0.0.236/trunk@28728 18797224-902f-48f8-a5cc-f745e15eee43 --- mozilla/webtools/tinderbox/addnote.cgi | 15 ++++++++++++--- 1 file changed, 12 insertions(+), 3 deletions(-) diff --git a/mozilla/webtools/tinderbox/addnote.cgi b/mozilla/webtools/tinderbox/addnote.cgi index 63ea481bb05..bbc0a2eb493 100755 --- a/mozilla/webtools/tinderbox/addnote.cgi +++ b/mozilla/webtools/tinderbox/addnote.cgi @@ -40,7 +40,13 @@ if( -r "$tree/ignorebuilds.pl" ){ require "$tree/ignorebuilds.pl"; } -print "Content-type: text/html\n\n\n"; +print "Content-Type:text/html\n"; +if ($ENV{"REQUEST_METHOD"} eq 'POST' && defined($form{'note'})) { + # Expire the cookie 5 months from now + print "Set-Cookie: email=$form{who}; expires=" + . toGMTString(time + 86400 * 152) . "; path=/\n"; +} +print "\n\n"; if( $url = $form{"note"} ){ @@ -87,7 +93,10 @@ Go back to the Error Log #print "$buildname \n $buildtime \n $errorparser \n $logfile \n $tree \n $enc_buildname \n"; - print qq( +$emailvalue = ''; +$emailvalue = " value='$cookie_jar{email}'" if defined($cookie_jar{email}); + +print qq( Add a Comment to $buildname log @@ -110,7 +119,7 @@ Go back to the Error Log Email address: -
+