|
Lines 6-11
use C4::Circulation;
Link Here
|
| 6 |
use C4::Members; |
6 |
use C4::Members; |
| 7 |
use C4::Items; |
7 |
use C4::Items; |
| 8 |
use Koha::DateUtils; |
8 |
use Koha::DateUtils; |
|
|
9 |
use Koha::Libraries; |
| 9 |
use Koha::Patrons; |
10 |
use Koha::Patrons; |
| 10 |
use t::lib::TestBuilder; |
11 |
use t::lib::TestBuilder; |
| 11 |
use t::lib::Mocks qw(mock_preference); |
12 |
use t::lib::Mocks qw(mock_preference); |
|
Lines 15-20
use Test::More tests => 8;
Link Here
|
| 15 |
my $schema = Koha::Database->new->schema; |
16 |
my $schema = Koha::Database->new->schema; |
| 16 |
$schema->storage->txn_begin; |
17 |
$schema->storage->txn_begin; |
| 17 |
|
18 |
|
|
|
19 |
my $builder = t::lib::TestBuilder->new; |
| 20 |
$builder->build({ source => 'Branch', value => { branchcode => 'CPL' } }) |
| 21 |
unless Koha::Libraries->find('CPL'); |
| 22 |
|
| 18 |
C4::Context->_new_userenv(1234567); |
23 |
C4::Context->_new_userenv(1234567); |
| 19 |
C4::Context->set_userenv(91, 'CLIstaff', '23529001223661', 'CPL', |
24 |
C4::Context->set_userenv(91, 'CLIstaff', '23529001223661', 'CPL', |
| 20 |
'CPL', 'CPL', '', 'cc@cscnet.co.uk'); |
25 |
'CPL', 'CPL', '', 'cc@cscnet.co.uk'); |
|
Lines 25-31
my $test_item_fic = '502326000402';
Link Here
|
| 25 |
my $test_item_24 = '502326000404'; |
30 |
my $test_item_24 = '502326000404'; |
| 26 |
my $test_item_48 = '502326000403'; |
31 |
my $test_item_48 = '502326000403'; |
| 27 |
|
32 |
|
| 28 |
my $builder = t::lib::TestBuilder->new; |
|
|
| 29 |
my $borrower1 = $builder->build_object({ class => 'Koha::Patrons', value => { cardnumber => $test_patron } }); |
33 |
my $borrower1 = $builder->build_object({ class => 'Koha::Patrons', value => { cardnumber => $test_patron } }); |
| 30 |
my $item1 = $builder->build_object({ |
34 |
my $item1 = $builder->build_object({ |
| 31 |
class => 'Koha::Items', |
35 |
class => 'Koha::Items', |
| 32 |
- |
|
|