die "Server appears to have died" if $count++ > 50;\r
}\r
my $response = get("http://localhost:$port/action/default");\r
- like( $response, qr/Catalyst::Request/, 'Request OK' );\r
+ like( $response, qr/Catalyst::Request/, 'Non-error restart, request OK' );\r
\r
#print $server->getline;\r
}\r
die "Server appears to have died";\r
}\r
my $response = get("http://localhost:$port/action/default");\r
- like( $response, qr/Catalyst::Request/, 'Request OK' );\r
+ like( $response, qr/Catalyst::Request/, 'Syntax error, no restart, request OK' );\r
\r
#print $server->getline;\r
}\r