Umstellung von TODO auf SKIP und Verkürzung der Tests damit um mehr als 5 Minuten...

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

diff --git a/t/selenium/AllTests.t b/t/selenium/AllTests.t
index 8e6ee80f3f1023116d87bf5bd331e106f5eb5671..8a1a13e39b81357791fcd86b22b9f3368fc4d3e8 100644 (file)
--- a/t/selenium/AllTests.t
+++ b/t/selenium/AllTests.t
@@ -61,7 +61,7 @@
 #     plan tests => 200; # Need to be cutomized
 #   }
   sub init_server {
-    my $singlefileonly = 0;
+    our $singlefileonly = 0;
     if ($_[0] eq "singlefileonly") {  
       $singlefileonly = 1;
       shift;
@@ -115,7 +115,7 @@
     
     if(!$singlefileonly) {
       foreach my $scriptdir (@_) {
-        opendir(SCRIPTS, 't/selenium/testscripts/' . $scriptdir);
+        opendir(SCRIPTS, 't/selenium/testscripts/' . $scriptdir) or die "Can't open directory!" . $!;
         foreach (sort readdir(SCRIPTS)) {
           require_ok("t/selenium/testscripts/". $scriptdir . "/" . $_) if ( $_ =~ /^\w\d\d\d.*\.t$/);
         }
@@ -131,4 +131,15 @@
     $sel->stop();
   }
   
+  sub start_login() {
+    require "t/selenium/testscripts/base/000Login.t" if(!$sel->{_page_opened});
+    skip("Failed page to load pages!",) if(!$sel->{_page_opened});
+
+    if($sel->get_title() ne "Lx-Office Version 2.4.3 - Selenium - " . $lxtest->{db}){
+      require "t/selenium/testscripts/base/000Login.t";
+    }
+
+    $sel->select_frame_ok("relative=up");
+  }
+  
 1;