From 182b9827ef25769df21dcabb800161d819ef0a8f Mon Sep 17 00:00:00 2001 From: Thomas Kasulke Date: Tue, 31 Jul 2007 10:10:30 +0000 Subject: [PATCH] =?utf8?q?TestScript=20f=C3=BCr=20Login?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit --- t/selenium/testscripts/010Login.t | 22 ++++++++++++++++++++++ 1 file changed, 22 insertions(+) create mode 100644 t/selenium/testscripts/010Login.t diff --git a/t/selenium/testscripts/010Login.t b/t/selenium/testscripts/010Login.t new file mode 100644 index 000000000..27bb63cc0 --- /dev/null +++ b/t/selenium/testscripts/010Login.t @@ -0,0 +1,22 @@ +### Login + +diag("TestLogin"); + +$sel->open_ok($lxtest->{lxbaseurl}."/login.pl"); + +$sel->wait_for_page_to_load_ok($lxtest->{timeout}); +$sel->title_is("Lx-Office Version ".$lxtest->{version}); +$sel->type_ok("login", $lxtest->{testuserlogin}); +$sel->type_ok("password", $lxtest->{testuserpasswd}); +$sel->click_ok("//input[(\@name=\"action\") and (\@value=\"Anmeldung\")]"); + +$sel->wait_for_page_to_load_ok($lxtest->{timeout}); +if($sel->title_is("Datenbankaktualisierung - Lx-Office Version 2.4.3 - -")) { + $sel->click_ok("//input[(\@name=\"dummy\") and (\@value=\"Weiter\")]"); + $sel->wait_for_page_to_load_ok($lxtest->{timeoutlong}); + $sel->click_ok("//input[(\@type=\"submit\") and (\@value=\"Weiter\")]"); + $sel->wait_for_page_to_load_ok($lxtest->{timeout}); +} + +$sel->title_is("Datenbankaktualisierung - Lx-Office Version 2.4.3 - -"); +1; \ No newline at end of file -- 2.20.1