X-Git-Url: http://sjero.net/git/?p=wget;a=blobdiff_plain;f=tests%2FHTTPServer.pm;h=01c36957535268e6bc3e693786350f6fc518dd2b;hp=b76f0985742af738c1ddb2ed3514aa1a9afd7a3e;hb=ab0b0a40904c6cbd4a21d61c6acf31ff11c30a71;hpb=090f1596ae2eb446c265a62849f59657a9ee9e07 diff --git a/tests/HTTPServer.pm b/tests/HTTPServer.pm index b76f0985..01c36957 100644 --- a/tests/HTTPServer.pm +++ b/tests/HTTPServer.pm @@ -27,7 +27,8 @@ sub run { my $con = $self->accept(); print STDERR "Accepted a new connection\n" if $log; while (my $req = $con->get_request) { - my $url_path = $req->url->path; + #my $url_path = $req->url->path; + my $url_path = $req->url->as_string; if ($url_path =~ m{/$}) { # append 'index.html' $url_path .= 'index.html'; }