Răsfoiți Sursa

Made the driver attribute ro

Emmanuel Peroumalnaik 10 ani în urmă
părinte
comite
3f71c3290e
2 a modificat fișierele cu 29 adăugiri și 23 ștergeri
  1. 1 1
      lib/Selenium/ActionChains.pm
  2. 28 22
      t/11-action-chains.t

+ 1 - 1
lib/Selenium/ActionChains.pm

@@ -3,7 +3,7 @@ package Selenium::ActionChains;
 use Moo; 
 
 has 'driver' => ( 
-    is => 'rw', 
+    is => 'ro', 
 );
 
 has 'actions' => ( 

+ 28 - 22
t/11-action-chains.t

@@ -15,28 +15,34 @@ my $harness = TestHarness->new(
     this_file => $FindBin::Script
 );
 my %selenium_args = %{ $harness->base_caps };
-
-my $driver = Test::Selenium::Remote::Driver->new(%selenium_args);
-my $action_chains = Selenium::ActionChains->new(driver => $driver);
-
-$driver->get('https://www.google.com');
-my $input_text = $driver->find_element("//input[\@type='text']");
-# type text to search on Google and press 'Enter'
-$action_chains->send_keys_to_element( $input_text, "test" )
-  ->key_down([KEYS->{'enter'}])->key_up([KEYS->{'enter'}])->perform;
-$driver->find_elements_ok("//*[\@class='hdtb-mitem']","We found Google's navbar");
-$driver->quit;
-
-$driver = Test::Selenium::Remote::Driver->new(%selenium_args);
-$action_chains->driver($driver);
-$action_chains->clear_actions;
-
-$driver->get("http://medialize.github.io/jQuery-contextMenu/demo.html"); 
-my $right_click_zone = $driver->find_element("//*[contains(text(),'right click me')]");
-$action_chains->context_click($right_click_zone)->perform;
-$driver->find_element("//*[text()='Paste']")->is_displayed_ok("The menu is correctly displayed on right click");
-$driver->quit;
-
+{
+    my $driver = Test::Selenium::Remote::Driver->new(%selenium_args);
+    my $action_chains = Selenium::ActionChains->new( driver => $driver );
+
+    $driver->get('https://www.google.com');
+    my $input_text = $driver->find_element("//input[\@type='text']");
+
+    # type text to search on Google and press 'Enter'
+    $action_chains->send_keys_to_element( $input_text, "test" )
+      ->key_down( [ KEYS->{'enter'} ] )->key_up( [ KEYS->{'enter'} ] )
+      ->perform;
+    $driver->find_elements_ok( "//*[\@class='hdtb-mitem']",
+        "We found Google's navbar" );
+    $driver->quit;
+}
+
+{
+    my $driver = Test::Selenium::Remote::Driver->new(%selenium_args);
+    my $action_chains = Selenium::ActionChains->new( driver => $driver );
+
+    $driver->get("http://medialize.github.io/jQuery-contextMenu/demo.html");
+    my $right_click_zone =
+      $driver->find_element("//*[contains(text(),'right click me')]");
+    $action_chains->context_click($right_click_zone)->perform;
+    $driver->find_element("//*[text()='Paste']")
+      ->is_displayed_ok("The menu is correctly displayed on right click");
+    $driver->quit;
+}
 
 
 done_testing;