coar 97/07/30 12:15:15
Modified: . bugdb.cgi
Log:
Oops! Some bad assumptions were made about where the "quickfmt="
would appear in the GET arguments..
Revision Changes Path
1.11 +3 -2 apache-site/bugdb.cgi
Index: bugdb.cgi
===================================================================
RCS file: /export/home/cvs/apache-site/bugdb.cgi,v
retrieving revision 1.10
retrieving revision 1.11
diff -u -r1.10 -r1.11
--- bugdb.cgi 1997/07/30 19:00:14 1.10
+++ bugdb.cgi 1997/07/30 19:15:14 1.11
@@ -163,10 +163,10 @@
### Query a number of PR's and display in quick output form
} elsif ($PATH_INFO =~ m,^/quick,) {
# Get arg of quickfmt=
- $QUERY_STRING =~ m,^quickfmt=(\w+)&,;
+ $QUERY_STRING =~ m,quickfmt=(\w+)&,;
$QUICKFMT = $1;
# Get all restrictions. First, strip off quickfmt prefix.
- ($RESTR = $QUERY_STRING) =~ s/^quickfmt=\w+&//;
+ ($RESTR = $QUERY_STRING) =~ s/quickfmt=\w+&//;
# Then, split into words.
@RESTR=split(/&/,$RESTR);
@@ -982,6 +982,7 @@
if ($oldval = $restrict{'pr'}) {
return &emit_preamble (1, "http:$SCRIPT_NAME/full/$oldval");
}
+ delete ($restrict{'pr'});
#
# Nope, it's a real query. Now let's remove form-fields that don't
# equate to GNATS-fields.
