|
|
@@ -2,6 +2,7 @@ use strict;
|
|
|
use warnings;
|
|
|
|
|
|
use Test::More;
|
|
|
+use Test::MockModule;
|
|
|
use Test::Selenium::Remote::Driver;
|
|
|
use Selenium::Remote::Mock::RemoteConnection;
|
|
|
|
|
|
@@ -15,9 +16,15 @@ my $harness = TestHarness->new(
|
|
|
this_file => $FindBin::Script
|
|
|
);
|
|
|
|
|
|
-my @browsers = qw/chrome firefox/;
|
|
|
+my @browsers = qw/chrome/;
|
|
|
|
|
|
foreach (@browsers) {
|
|
|
+ my @mock_session_ids = qw{2257c1cf-17d9-401a-a13b-fc7a279d7db5 dddddddd-17d9-401a-a13b-fc7a279d7db5 17c83f3a-3f23-4ffc-a50f-06ba5f5202d1};
|
|
|
+
|
|
|
+ my $mock = Test::MockModule->new('Selenium::Remote::Driver');
|
|
|
+ $mock->redefine('new_session', sub { my $s = shift; $s->{session_id} //= shift @mock_session_ids } );
|
|
|
+
|
|
|
+
|
|
|
my %selenium_args = (
|
|
|
default_finder => 'css',
|
|
|
javascript => 1,
|