View | Details | Raw Unified | Return to bug 29779
Collapse All | Expand All

(-)a/t/db_dependent/selenium/administration_tasks.t (-1 / +1 lines)
Lines 41-47 our ($cleanup_needed); Link Here
41
41
42
SKIP: {
42
SKIP: {
43
    eval { require Selenium::Remote::Driver; };
43
    eval { require Selenium::Remote::Driver; };
44
    skip "Selenium::Remote::Driver is needed for selenium tests.", 1 if $@;
44
    skip "Selenium::Remote::Driver is needed for selenium tests.", 3 if $@;
45
45
46
    $cleanup_needed = 1;
46
    $cleanup_needed = 1;
47
47
(-)a/t/db_dependent/selenium/basic_workflow.t (-2 / +2 lines)
Lines 85-98 our $sample_data = { Link Here
85
};
85
};
86
our ( $borrowernumber, $start, $prev_time, $cleanup_needed );
86
our ( $borrowernumber, $start, $prev_time, $cleanup_needed );
87
87
88
$dbh->do(q|INSERT INTO itemtypes(itemtype) VALUES (?)|, undef, $sample_data->{itemtype}{itemtype});
89
90
SKIP: {
88
SKIP: {
91
    eval { require Selenium::Remote::Driver; };
89
    eval { require Selenium::Remote::Driver; };
92
    skip "Selenium::Remote::Driver is needed for selenium tests.", 22 if $@;
90
    skip "Selenium::Remote::Driver is needed for selenium tests.", 22 if $@;
93
91
94
    $cleanup_needed = 1;
92
    $cleanup_needed = 1;
95
93
94
    $dbh->do(q|INSERT INTO itemtypes(itemtype) VALUES (?)|, undef, $sample_data->{itemtype}{itemtype});
95
96
    open my $fh, '>>', '/tmp/output.txt';
96
    open my $fh, '>>', '/tmp/output.txt';
97
97
98
    my $s = t::lib::Selenium->new;
98
    my $s = t::lib::Selenium->new;
(-)a/t/db_dependent/selenium/patrons_search.t (-2 / +7 lines)
Lines 20-26 use Modern::Perl; Link Here
20
use C4::Context;
20
use C4::Context;
21
21
22
use utf8;
22
use utf8;
23
use Test::More tests => 1;
23
use Test::More;
24
use Test::MockModule;
24
use Test::MockModule;
25
25
26
use C4::Context;
26
use C4::Context;
Lines 30-36 use t::lib::Selenium; Link Here
30
use t::lib::TestBuilder;
30
use t::lib::TestBuilder;
31
31
32
eval { require Selenium::Remote::Driver; };
32
eval { require Selenium::Remote::Driver; };
33
skip "Selenium::Remote::Driver is needed for selenium tests.", 1 if $@;
33
if ( $@ ) {
34
    plan skip_all => "Selenium::Remote::Driver is needed for selenium tests.";
35
} else {
36
    plan tests => 1;
37
}
38
34
39
35
my $s             = t::lib::Selenium->new;
40
my $s             = t::lib::Selenium->new;
36
my $driver        = $s->driver;
41
my $driver        = $s->driver;
(-)a/t/db_dependent/selenium/regressions.t (-2 / +6 lines)
Lines 20-26 use utf8; Link Here
20
20
21
use C4::Context;
21
use C4::Context;
22
22
23
use Test::More tests => 7;
23
use Test::More;
24
use Test::MockModule;
24
use Test::MockModule;
25
25
26
use C4::Context;
26
use C4::Context;
Lines 33-39 use t::lib::TestBuilder; Link Here
33
use t::lib::Mocks;
33
use t::lib::Mocks;
34
34
35
eval { require Selenium::Remote::Driver; };
35
eval { require Selenium::Remote::Driver; };
36
skip "Selenium::Remote::Driver is needed for selenium tests.", 7 if $@;
36
if ( $@ ) {
37
    plan skip_all => "Selenium::Remote::Driver is needed for selenium tests.";
38
} else {
39
    plan tests => 7;
40
}
37
41
38
my $s = t::lib::Selenium->new;
42
my $s = t::lib::Selenium->new;
39
43
(-)a/t/db_dependent/selenium/remove_from_cart.t (-3 / +7 lines)
Lines 19-25 use Modern::Perl; Link Here
19
use File::Basename qw(dirname );
19
use File::Basename qw(dirname );
20
20
21
use Test::WWW::Mechanize;
21
use Test::WWW::Mechanize;
22
use Test::More tests => 1;
22
use Test::More;
23
use Test::MockModule;
23
use Test::MockModule;
24
24
25
use C4::Context;
25
use C4::Context;
Lines 30-36 use t::lib::Mocks; Link Here
30
use t::lib::Mocks::Zebra;
30
use t::lib::Mocks::Zebra;
31
31
32
eval { require Selenium::Remote::Driver; };
32
eval { require Selenium::Remote::Driver; };
33
skip "Selenium::Remote::Driver is needed for selenium tests.", 1 if $@;
33
if ( $@ ) {
34
    plan skip_all => "Selenium::Remote::Driver is needed for selenium tests.";
35
} else {
36
    plan tests => 1;
37
}
34
38
35
my $s = t::lib::Selenium->new;
39
my $s = t::lib::Selenium->new;
36
40
Lines 101-105 subtest 'OPAC - Remove from cart' => sub { Link Here
101
105
102
END {
106
END {
103
    C4::Context->set_preference('SearchEngine', $SearchEngine_value);
107
    C4::Context->set_preference('SearchEngine', $SearchEngine_value);
104
    $mock_zebra->cleanup;
108
    $mock_zebra->cleanup if $mock_zebra;
105
};
109
};
(-)a/t/db_dependent/selenium/self_registration.t (-2 / +6 lines)
Lines 20-26 use utf8; Link Here
20
20
21
use C4::Context;
21
use C4::Context;
22
22
23
use Test::More tests => 1;
23
use Test::More;
24
use Test::MockModule;
24
use Test::MockModule;
25
25
26
use C4::Context;
26
use C4::Context;
Lines 30-36 use t::lib::TestBuilder; Link Here
30
use t::lib::Mocks;
30
use t::lib::Mocks;
31
31
32
eval { require Selenium::Remote::Driver; };
32
eval { require Selenium::Remote::Driver; };
33
skip "Selenium::Remote::Driver is needed for selenium tests.", 1 if $@;
33
if ( $@ ) {
34
    plan skip_all => "Selenium::Remote::Driver is needed for selenium tests.";
35
} else {
36
    plan tests => 1;
37
}
34
38
35
my $s = t::lib::Selenium->new;
39
my $s = t::lib::Selenium->new;
36
40
(-)a/t/db_dependent/selenium/update_child_to_adult.t (-3 / +6 lines)
Lines 19-25 use Modern::Perl; Link Here
19
19
20
use C4::Context;
20
use C4::Context;
21
21
22
use Test::More tests => 1;
22
use Test::More;
23
use Test::MockModule;
23
use Test::MockModule;
24
24
25
use C4::Context;
25
use C4::Context;
Lines 29-35 use t::lib::Selenium; Link Here
29
use t::lib::TestBuilder;
29
use t::lib::TestBuilder;
30
30
31
eval { require Selenium::Remote::Driver; };
31
eval { require Selenium::Remote::Driver; };
32
skip "Selenium::Remote::Driver is needed for selenium tests.", 1 if $@;
32
if ( $@ ) {
33
    plan skip_all => "Selenium::Remote::Driver is needed for selenium tests.";
34
} else {
35
    plan tests => 1;
36
}
33
37
34
my $s             = t::lib::Selenium->new;
38
my $s             = t::lib::Selenium->new;
35
my $driver        = $s->driver;
39
my $driver        = $s->driver;
36
- 

Return to bug 29779