1.1 --- a/lib/TWiki/Net.pm Sat Jan 26 15:50:53 2008 +0100
1.2 +++ b/lib/TWiki/Net.pm Mon Aug 11 20:30:19 2008 +0200
1.3 @@ -162,7 +162,7 @@
1.4 $port = $proxyPort;
1.5 }
1.6
1.7 - '$Rev: 16278 (22 Jan 2008) $'=~/([0-9]+)/;
1.8 + '$Rev: 17311 (04 Aug 2008) $'=~/([0-9]+)/;
1.9 my $revstr=$1;
1.10
1.11 $req .= 'User-Agent: TWiki::Net/'.$revstr."\r\n";
1.12 @@ -214,7 +214,7 @@
1.13 my $request;
1.14 require HTTP::Request;
1.15 $request = HTTP::Request->new(GET => $url);
1.16 - '$Rev: 16278 (22 Jan 2008) $'=~/([0-9]+)/;
1.17 + '$Rev: 17311 (04 Aug 2008) $'=~/([0-9]+)/;
1.18 my $revstr=$1;
1.19 $request->header('User-Agent' => 'TWiki::Net/'.$revstr." libwww-perl/$LWP::VERSION");
1.20 require TWiki::Net::UserCredAgent;