last;
}
}
- die "timed out waiting for selenium server to start" if $tries == 5;
+ die "timed out waiting for selenium server to start at
+ http://$self->{selenium_rc}{host}:$self->{selenium_rc}{port}" if $tries == 5;
}
sub stop_selenium_server {
sub test_directory {
my ($self, $dir) = @_;
+ if(!exists $self->{app_server_proc}) {
+ $self->start_app_server;
+ }
if($self->{selenium_rc}{start} && !$self->{selenium_rc}{selenium_server_proc}) {
$self->start_selenium_server;
}