From 154303bb89e16e74eee273525fc7de11d9b4014e Mon Sep 17 00:00:00 2001 From: Daniel Nichter Date: Wed, 22 Aug 2012 16:27:52 -0600 Subject: [PATCH] Use simpler URL HTTPMicro vs. HTTP::Tiny comparison. --- t/lib/HTTPMicro.t | 12 +++++++----- 1 file changed, 7 insertions(+), 5 deletions(-) diff --git a/t/lib/HTTPMicro.t b/t/lib/HTTPMicro.t index a2985937..2a759c0f 100644 --- a/t/lib/HTTPMicro.t +++ b/t/lib/HTTPMicro.t @@ -16,17 +16,19 @@ use HTTPMicro; local $EVAL_ERROR; eval { require HTTP::Tiny }; if ( $EVAL_ERROR ) { - plan skip_all => "HTTP::Tiny is not installed, not testing compat"; + plan skip_all => "HTTP::Tiny is not installed"; } -my $test_url = "http://www.google.com"; -my $tiny = HTTP::Tiny->new(max_redirect => 0)->request('GET', $test_url); -my $micro = HTTPMicro->new->request('GET', $test_url); +# Need a simple URL that won't try to do chunking. +my $test_url = "http://www.percona.com/robots.txt"; +my $tiny = HTTP::Tiny->new(max_redirect => 0)->request('GET', $test_url); +my $micro = HTTPMicro->new->request('GET', $test_url); is_deeply( $micro->{content}, $tiny->{content}, - "HTTPMicro behaves like HTTP::Tiny (with max_redirect) for $test_url" + "HTTPMicro behaves like HTTP::Tiny (max_redirect=0)" ); done_testing; +exit;