validator/httpd/cgi-bin check,1.487,1.488

Update of /sources/public/validator/httpd/cgi-bin
In directory hutz:/tmp/cvs-serv8558

Modified Files:
	check 
Log Message:
Small selfish edit, the m(^\d+$) construct systematically confused my editor.
Replacing with equivalent (I think) matching construct, which should work 
as well and make my life easier.



Index: check
===================================================================
RCS file: /sources/public/validator/httpd/cgi-bin/check,v
retrieving revision 1.487
retrieving revision 1.488
diff -u -d -r1.487 -r1.488
--- check	23 Mar 2007 03:52:21 -0000	1.487
+++ check	28 Mar 2007 02:34:04 -0000	1.488
@@ -1316,7 +1316,7 @@
   return unless defined $res->header('X-W3C-Validator-Recursion');
 
   my $lvl = $res->header('X-W3C-Validator-Recursion');
-  return unless $lvl =~ m(^\d+$); # Non-digit, i.e. garbage, ignore.
+  return unless $lvl =~ m/^\d+$/; # Non-digit, i.e. garbage, ignore.
 
   if ($lvl >= $CFG->{'Max Recursion'}) {
     print redirect $CFG->{'Home Page'};

Received on Wednesday, 28 March 2007 02:34:22 UTC