X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flive_app.t;h=fd816dbc04395f008ce5e699010939bb29b9ed56;hb=ab944aad7e42f6a33f1338b8c648cc14df6e53de;hp=16ab006eeaa3e16c15819aca863971d4d11aeb22;hpb=f29585f9540eae594f78959a0fec474ef9b18cd6;p=catagits%2FCatalyst-Authentication-Credential-OpenID.git

diff --git a/t/live_app.t b/t/live_app.t
index 16ab006..fd816db 100644
--- a/t/live_app.t
+++ b/t/live_app.t
@@ -8,16 +8,12 @@ use IO::Socket;
 use Test::More;
 use Test::WWW::Mechanize;
 
-
-plan skip_all => 'set TEST_HTTP to enable this test' unless $ENV{TEST_HTTP};
+# plan skip_all => 'set TEST_HTTP to enable this test' unless $ENV{TEST_HTTP};
 eval "use Catalyst::Devel 1.0";
 plan skip_all => 'Catalyst::Devel required' if $@;
 
-# plan "no_plan";
 plan tests => 17;
 
-# TEST FORK?
-
 # How long to wait for test server to start and timeout for UA.
 my $seconds = 30;
 
@@ -28,7 +24,6 @@ my $port = 30000 + int rand(1 + 10000);
 
 # my $pipe = "perl -I$FindBin::Bin/../lib -I$FindBin::Bin/TestApp/lib $FindBin::Bin/TestApp/script/testapp_server.pl -f -port $port 2>&1 |";
 
-
 my $pid = open my $server, $pipe
     or die "Unable to spawn standalone HTTP server: $!";