From 89eccc9b74482b8c636a02d3a6bcf3ec2947eb7b Mon Sep 17 00:00:00 2001 From: "terry%netscape.com" <> Date: Sat, 21 Nov 1998 03:18:33 +0000 Subject: Backed out Andrew's patch -- turns out it was doing quoting sublty wrong. --- post_bug.cgi | 15 +++++---------- 1 file changed, 5 insertions(+), 10 deletions(-) (limited to 'post_bug.cgi') diff --git a/post_bug.cgi b/post_bug.cgi index 52885a535..3ea3b070f 100755 --- a/post_bug.cgi +++ b/post_bug.cgi @@ -18,7 +18,6 @@ # Netscape Communications Corporation. All Rights Reserved. # # Contributor(s): Terry Weissman -# Andrew Anderson use diagnostics; @@ -35,19 +34,17 @@ $zz = $zz . $zz; confirm_login(); -my $platform = url_quote($::FORM{'product'}); -my $version = url_quote($::FORM{'version'}); - -print "Set-Cookie: PLATFORM=$platform ; path=/ ; expires=Sun, 30-Jun-2029 00:00:00 GMT\n"; -print "Set-Cookie: VERSION-$platform=$version ; path=/ ; expires=Sun, 30-Jun-2029 00:00:00 GMT\n"; +print "Set-Cookie: PLATFORM=$::FORM{'product'} ; path=/ ; expires=Sun, 30-Jun-2029 00:00:00 GMT\n"; +print "Set-Cookie: VERSION-$::FORM{'product'}=$::FORM{'version'} ; path=/ ; expires=Sun, 30-Jun-2029 00:00:00 GMT\n"; print "Content-type: text/html\n\n"; if (defined $::FORM{'maketemplate'}) { - PutHeader("Bookmarks are your friend.", "Template constructed."); + print "Bookmarks are your friend.\n"; + print "

Template constructed.

\n"; my $url = "enter_bug.cgi?$::buffer"; - print "If you put a bookmark to this link, it will\n"; + print "If you put a bookmark to this link, it will\n"; print "bring up the submit-a-new-bug page with the fields initialized\n"; print "as you've requested.\n"; exit; @@ -121,8 +118,6 @@ foreach my $person (keys %ccids) { print "

Changes Submitted

\n"; print "Show BUG# $id\n"; print "
Back To Query Page\n"; -print "
Enter a new bug\n"; - system("./processmail $id < /dev/null > /dev/null 2> /dev/null &"); exit; -- cgit v1.2.3-24-g4f1b