httpd-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From Rodent of Unusual Size <c...@hyperreal.org>
Subject cvs commit: apache-site bugdb.cgi
Date Wed, 13 Aug 1997 21:03:34 GMT
coar        97/08/13 14:03:34

  Modified:    .        bugdb.cgi
  Log:
  	The check for the special keyword "any" was occluding field
  	values that included "any" with sentinel characters Perl recognised
  	as "word boundaries."  So "mod_auth-any" wouldn't make it
  	through.
  
  PR:	749
  
  Revision  Changes    Path
  1.14      +8 -3      apache-site/bugdb.cgi
  
  Index: bugdb.cgi
  ===================================================================
  RCS file: /export/home/cvs/apache-site/bugdb.cgi,v
  retrieving revision 1.13
  retrieving revision 1.14
  diff -u -r1.13 -r1.14
  --- bugdb.cgi	1997/08/09 01:13:09	1.13
  +++ bugdb.cgi	1997/08/13 21:03:32	1.14
  @@ -50,6 +50,8 @@
   #    than 4 columns - easier to follow link without having to
   #    horizontally scroll back.  Also added field to let you go directly
   #    to a particular PR from the main menu (prompted by Dean Gaudet).
  +#  8/13/1997 Ken Coar - fix problem causing check for "any" keyword to
  +#    occlude things like "mod_auth-any".
   #
   ### End Modification log
   
  @@ -184,7 +186,7 @@
   ### Main menu
   } elsif ($PATH_INFO eq "") {
       &main_menu();
  -    print "<HR><SMALL>Version: 30 July 1997<BR>Authors: ",
  +    print "<HR><SMALL>Version: 13 August 1997<BR>Authors: ",
   	"<A HREF=\"http://alumni.caltech.edu/~dank/gnats.html\">Dan Kegel ",
   	"and Huy Le</A>, <BR> ",
   	"with revamp work by ",
  @@ -1055,8 +1057,11 @@
   	foreach (keys(%restrict)) {
   	    $oldkey = $_;
   	    $oldval = $restrict{$oldkey};
  -	    # If "any" was given, don't bother using this key
  -	    if ($oldval !~ /\bany\b/) {
  +	    # If "any" was given as a distinct keyword, alone or in
  +	    # combination, don't bother using this key
  +	    if (($oldval ne "any")
  +	        && ($oldval !~ /^any\|/)
  +		&& ($oldval !~ /\|any$/)) {
   		# Turn underscores and spaces into regular expression
   		# that match either underscores or spaces
   		# (Our database sometimes puts underscores instead of spaces).
  
  
  

Mime
View raw message