diff options
| author | link <link@localhost> | 2005-02-03 22:49:59 +0000 |
|---|---|---|
| committer | link <link@localhost> | 2005-02-03 22:49:59 +0000 |
| commit | 4f825495e7be19e3394b127743f54ede7efb6f48 (patch) | |
| tree | 68a90acea52a24fd75fc73a618dc5a42ed1eddab | |
| parent | fd4a6725f98f290134300e6985b13a7b1ad64804 (diff) | |
| download | markup-validator-4f825495e7be19e3394b127743f54ede7efb6f48.zip markup-validator-4f825495e7be19e3394b127743f54ede7efb6f48.tar.gz markup-validator-4f825495e7be19e3394b127743f54ede7efb6f48.tar.bz2 | |
Nuke LWP from UA string to avoid getting thrown out with the bathwater.
| -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 21da63f..851a55f 100755 --- a/httpd/cgi-bin/check +++ b/httpd/cgi-bin/check @@ -9,7 +9,7 @@ # This source code is available under the license at: # http://www.w3.org/Consortium/Legal/copyright-software # -# $Id: check,v 1.376 2005-01-15 16:18:38 ville Exp $ +# $Id: check,v 1.377 2005-02-03 22:49:59 link Exp $ # # Disable buffering on STDOUT! @@ -222,7 +222,7 @@ Directory not readable (permission denied): @_r # # Strings - $VERSION = q$Revision: 1.376 $; + $VERSION = q$Revision: 1.377 $; $VERSION =~ s/Revision: ([\d\.]+) /$1/; # @@ -1191,7 +1191,7 @@ sub handle_uri { my $ua = new LWP::UserAgent; $ua->env_proxy(); - $ua->agent("W3C_Validator/$VERSION " . $ua->agent); + $ua->agent("W3C_Validator/$VERSION"); $ua->parse_head(0); # Parse the http-equiv stuff ourselves. @@ Why? $ua->protocols_allowed($CFG->{Protocols}->{Allow} || ['http', 'https']); |