diff options
| author | ot <ot@localhost> | 2007-03-28 02:34:04 +0000 |
|---|---|---|
| committer | ot <ot@localhost> | 2007-03-28 02:34:04 +0000 |
| commit | f48f8e919a2b5a03ffb7d87a5f8ae2182303cb35 (patch) | |
| tree | a827018dcab1e710e071a8301f8057c308f26bb5 | |
| parent | 31746d624d791b8b9c8def030e58626e241c5614 (diff) | |
| download | markup-validator-f48f8e919a2b5a03ffb7d87a5f8ae2182303cb35.zip markup-validator-f48f8e919a2b5a03ffb7d87a5f8ae2182303cb35.tar.gz markup-validator-f48f8e919a2b5a03ffb7d87a5f8ae2182303cb35.tar.bz2 | |
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.
| -rwxr-xr-x | httpd/cgi-bin/check | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/httpd/cgi-bin/check b/httpd/cgi-bin/check index 7f79b3d..f7affac 100755 --- a/httpd/cgi-bin/check +++ b/httpd/cgi-bin/check @@ -14,7 +14,7 @@ # This source code is available under the license at: # http://www.w3.org/Consortium/Legal/copyright-software # -# $Id: check,v 1.487 2007-03-23 03:52:21 ot Exp $ +# $Id: check,v 1.488 2007-03-28 02:34:04 ot Exp $ # # Disable buffering on STDOUT! @@ -180,7 +180,7 @@ Directory not readable (permission denied): @_r # # Strings - $VERSION = q$Revision: 1.487 $; + $VERSION = q$Revision: 1.488 $; $VERSION =~ s/Revision: ([\d\.]+) /$1/; # @@ -1316,7 +1316,7 @@ sub check_recursion ($$) { 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'}; |