Lines 33-42
use MARC::Field;
Link Here
|
33 |
use t::lib::Selenium; |
33 |
use t::lib::Selenium; |
34 |
|
34 |
|
35 |
my $dbh = C4::Context->dbh; |
35 |
my $dbh = C4::Context->dbh; |
36 |
my $login = 'koha'; |
36 |
my $login = $ENV{KOHA_USER} || 'koha'; |
37 |
my $password = 'koha'; |
37 |
my $password = $ENV{KOHA_PASS} || 'koha'; |
38 |
my $base_url= 'http://'.C4::Context->preference("staffClientBaseURL")."/cgi-bin/koha/"; |
38 |
my $staff_client_base_url = |
39 |
my $opac_url= C4::Context->preference("OPACBaseURL"); |
39 |
$ENV{KOHA_INTRANET_URL} || C4::Context->preference("staffClientBaseUrl") || q{}; |
|
|
40 |
my $base_url= $staff_client_base_url . "/cgi-bin/koha/"; |
41 |
my $opac_url = $ENV{KOHA_OPAC_URL} || C4::Context->preference("OPACBaseURL") || q{}; |
40 |
|
42 |
|
41 |
BEGIN { |
43 |
BEGIN { |
42 |
my $debug = $ENV{DEBUG}; |
44 |
my $debug = $ENV{DEBUG}; |
Lines 54-61
our $sample_data = {
Link Here
|
54 |
surname => 'test_patron_surname', |
56 |
surname => 'test_patron_surname', |
55 |
cardnumber => '4242424242', |
57 |
cardnumber => '4242424242', |
56 |
userid => 'test_username', |
58 |
userid => 'test_username', |
57 |
password => 'password', |
59 |
password => 'Password123', |
58 |
password2 => 'password' |
60 |
password2 => 'Password123' |
59 |
}, |
61 |
}, |
60 |
}; |
62 |
}; |
61 |
|
63 |
|
62 |
- |
|
|