From 59949f14ef0e3f04dda22a849969993069b6ddf3 Mon Sep 17 00:00:00 2001 From: franck cuny Date: Thu, 3 Jun 2010 14:52:53 +0200 Subject: swith to dist::zilla --- t/01_basic.t | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) (limited to 't/01_basic.t') diff --git a/t/01_basic.t b/t/01_basic.t index cd93d94..86de374 100644 --- a/t/01_basic.t +++ b/t/01_basic.t @@ -19,7 +19,7 @@ Test::TCP::test_tcp( my $request = HTTP::Request->new(GET => "http://127.0.0.1:$port/"); my $res = $ua->request($request); ok($res->is_success, "server responded"); - like($res->content, qr/this is a warning/, "log message send"); + like($res->content, qr/this is a warning/, "log message send"); }, server => sub { my $port = shift; @@ -30,11 +30,11 @@ Test::TCP::test_tcp( setting apphandler => 'PSGI'; setting port => $port; setting access_log => 0; - setting logger => "PSGI"; + setting logger => "PSGI"; get '/' => sub { warning "this is a warning"; - return "this is a test"; + return "this is a test"; }; my $app = sub { @@ -42,8 +42,8 @@ Test::TCP::test_tcp( my $request = Dancer::Request->new($env); Dancer->dance($request); }; - $app = builder { enable "ConsoleLogger"; $app }; - Plack::Loader->auto(port => $port)->run($app); + $app = builder { enable "ConsoleLogger"; $app }; + Plack::Loader->auto(port => $port)->run($app); }, ); -- cgit v1.2.3