Many fixes.
[scpubgit/Test-Harness-Selenium.git] / lib / Test / Harness / Selenium.pm
index 4b6cf60..dc4d936 100644 (file)
@@ -80,7 +80,8 @@ sub start_selenium_server {
       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 {
@@ -108,6 +109,9 @@ sub stop_app_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;
   }