Permalink
Browse files

Depending on latest HTTP::Parser and fixing some tests

  • Loading branch information...
1 parent a3fbde8 commit dd95ee1ab0da0d89e8a18e39e9b4cbebabdd4f44 @frodwith frodwith committed with Mar 7, 2011
Showing with 3 additions and 3 deletions.
  1. +1 −1 dist.ini
  2. +1 −1 t/01_filter_req.t
  3. +1 −1 t/02_in_use.t
View
@@ -14,7 +14,7 @@ Test::POE::Server::TCP = 0.16
[Prereqs]
Encode = 0
-HTTP::Parser = 0.04
+HTTP::Parser = 0.06
HTTP::Request = 0
HTTP::Response = 0
HTTP::Status = 0
View
@@ -27,6 +27,6 @@ foreach my $test ( $filter, $clone ) {
foreach my $req ( @$events ) {
isa_ok( $req, 'HTTP::Request' );
is( $req->method, 'GET', 'Request method was okay' );
- is( $req->uri->as_string, '/', 'The URI was okay' );
+ is( $req->uri->path, '/', 'The URI was okay' );
}
}
View
@@ -73,7 +73,7 @@ sub httpd_client_input {
my $test = delete $heap->{current_test};
isa_ok( $req, 'HTTP::Request' );
is( $req->method, 'GET', 'Request method is GET' );
- is( $req->uri->as_string, $test, 'Correct path' );
+ is( $req->uri->path, $test, 'Correct path' );
is( $req->header('X-HTTP-Version'), '1.1', 'X-HTTP-Version' );
diag($req->as_string);
my $resp = HTTP::Response->new( 200 );

0 comments on commit dd95ee1

Please sign in to comment.