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

(-)a/t/db_dependent/selenium/basic_workflow.t (-9 / +28 lines)
Lines 40-46 use C4::Biblio qw( AddBiblio ); # We shouldn't use it Link Here
40
40
41
use Koha::CirculationRules;
41
use Koha::CirculationRules;
42
42
43
use Test::More tests => 20;
43
use Test::More tests => 22;
44
use MARC::Record;
44
use MARC::Record;
45
use MARC::Field;
45
use MARC::Field;
46
46
Lines 77-82 our $sample_data = { Link Here
77
        issuelength   => '5',
77
        issuelength   => '5',
78
        lengthunit    => 'days',
78
        lengthunit    => 'days',
79
        renewalperiod => '5',
79
        renewalperiod => '5',
80
        reservesallowed => '5',
81
        onshelfholds  => '1',
82
        opacitemholds => 'Y',
80
      },
83
      },
81
};
84
};
82
our ( $borrowernumber, $start, $prev_time, $cleanup_needed );
85
our ( $borrowernumber, $start, $prev_time, $cleanup_needed );
Lines 85-91 $dbh->do(q|INSERT INTO itemtypes(itemtype) VALUES (?)|, undef, $sample_data->{it Link Here
85
88
86
SKIP: {
89
SKIP: {
87
    eval { require Selenium::Remote::Driver; };
90
    eval { require Selenium::Remote::Driver; };
88
    skip "Selenium::Remote::Driver is needed for selenium tests.", 20 if $@;
91
    skip "Selenium::Remote::Driver is needed for selenium tests.", 22 if $@;
89
92
90
    $cleanup_needed = 1;
93
    $cleanup_needed = 1;
91
94
Lines 155-166 SKIP: { Link Here
155
            categorycode => $issuing_rules->{categorycode},
158
            categorycode => $issuing_rules->{categorycode},
156
            itemtype     => $issuing_rules->{itemtype},
159
            itemtype     => $issuing_rules->{itemtype},
157
            branchcode   => $issuing_rules->{branchcode},
160
            branchcode   => $issuing_rules->{branchcode},
158
            rules        => {
161
            rules => {
159
                maxissueqty => $issuing_rules->{maxissueqty},
162
                maxissueqty     => $issuing_rules->{maxissueqty},
160
                issuelength => $issuing_rules->{issuelength},
163
                issuelength     => $issuing_rules->{issuelength},
161
                lengthunit => $issuing_rules->{lengthunit},
164
                lengthunit      => $issuing_rules->{lengthunit},
162
                renewalperiod => $issuing_rules->{renewalperiod},
165
                renewalperiod   => $issuing_rules->{renewalperiod},
163
            }
166
                reservesallowed => $issuing_rules->{reservesallowed},
167
                onshelfholds    => $issuing_rules->{onshelfholds},
168
                opacitemholds   => $issuing_rules->{opacitemholds},
169
170
              }
164
        }
171
        }
165
    );
172
    );
166
173
Lines 227-232 SKIP: { Link Here
227
234
228
    time_diff("checkin");
235
    time_diff("checkin");
229
236
237
    #Place holds
238
    $driver->get($base_url."/reserve/request.pl?borrowernumber=$borrowernumber&biblionumber=".$biblionumbers[0]);
239
    $driver->find_element('//form[@id="hold-request-form"]//input[@type="submit"]')->click; # Biblio level
240
    my $patron = Koha::Patrons->find($borrowernumber);
241
    is( $patron->holds->count, 1, );
242
243
    $driver->get($base_url."/reserve/request.pl?borrowernumber=$borrowernumber&biblionumber=".$biblionumbers[1]);
244
    $driver->find_element('//form[@id="hold-request-form"]//input[@type="radio"]')->click; # Item level, there is only 1 item per bib so we are safe
245
    $driver->find_element('//form[@id="hold-request-form"]//input[@type="submit"]')->click;
246
    is( $patron->holds->count, 2, );
247
248
    time_diff("holds");
249
230
    close $fh;
250
    close $fh;
231
    $driver->quit();
251
    $driver->quit();
232
};
252
};
233
- 

Return to bug 22898