Fortführung der Struturierung und hinzufügen von Systemtests, sowie globaler Login...

[mfinanz.git] / t / selenium / AllTests.t

diff --git a/t/selenium/AllTests.t b/t/selenium/AllTests.t
index c3c5265b7f70c29557c90620c6ed7d76856511d4..a6cca0704f518f10b845ec5d561cde6743099c33 100644 (file)
--- a/t/selenium/AllTests.t
+++ b/t/selenium/AllTests.t
@@ -39,7 +39,6 @@
   use Test::More qw(no_plan);
   use IO::Socket;
 
-
   if(-f "/tmp/lxtest-temp.conf") {
     eval { require('/tmp/lxtest-temp.conf'); };
   }
@@ -74,9 +73,9 @@
 
 
     $lxtest->{test_id} = time; # create individual ids by unixtime
-    $lxtest->{testuserlogin}   = $lxtest->{testlogin} . $lxtest->{test_id};
-    $lxtest->{testuserpasswd}  = $lxtest->{test_id};
-    $lxtest->{db}              = $lxtest->{db} . $lxtest->{test_id};
+    $lxtest->{testuserlogin}   = $lxtest->{testlogin} . $lxtest->{test_id} if(!$lxtest->{testuserlogin});
+    $lxtest->{testuserpasswd}  = $lxtest->{test_id} if(!$lxtest->{testuserpasswd});
+    $lxtest->{db}              = $lxtest->{db} . $lxtest->{test_id} if(!($lxtest->{db} =~ /^seleniumtestdatabase[0-9]{10}$/));
 
     ok(defined $lxtest->{rpw}, "Get root password");
   
@@ -116,6 +115,9 @@
       }
       closedir(SCRIPTS);
     }
+    if($!) {
+      @! = ("Test fehlgeschlagen!");
+    }
     $sel->stop();
   }