|
Lines 22-32
BEGIN {
Link Here
|
| 22 |
my $schema = Koha::Database->new->schema; |
22 |
my $schema = Koha::Database->new->schema; |
| 23 |
$schema->storage->txn_begin; |
23 |
$schema->storage->txn_begin; |
| 24 |
my $dbh = C4::Context->dbh; |
24 |
my $dbh = C4::Context->dbh; |
| 25 |
my $builder = t::lib::TestBuilder->new; |
|
|
| 26 |
|
25 |
|
| 27 |
# Some advanced mocking :) |
26 |
# Some advanced mocking :) |
| 28 |
my ( @zebrarecords, $index ); |
27 |
my ( @zebrarecords, $index ); |
| 29 |
my $auth_mod = Test::MockModule->new( 'C4::AuthoritiesMarc' ); |
|
|
| 30 |
my $context_mod = Test::MockModule->new( 'C4::Context' ); |
28 |
my $context_mod = Test::MockModule->new( 'C4::Context' ); |
| 31 |
my $search_mod = Test::MockModule->new( 'C4::Search' ); |
29 |
my $search_mod = Test::MockModule->new( 'C4::Search' ); |
| 32 |
my $zoom_mod = Test::MockModule->new( 'ZOOM::Query::CCL2RPN', no_auto => 1 ); |
30 |
my $zoom_mod = Test::MockModule->new( 'ZOOM::Query::CCL2RPN', no_auto => 1 ); |
|
Lines 205-210
sub set_mocks {
Link Here
|
| 205 |
} |
203 |
} |
| 206 |
|
204 |
|
| 207 |
sub modify_framework { |
205 |
sub modify_framework { |
|
|
206 |
my $builder = t::lib::TestBuilder->new; |
| 207 |
|
| 208 |
# create two auth types |
208 |
# create two auth types |
| 209 |
my $authtype1 = $builder->build({ |
209 |
my $authtype1 = $builder->build({ |
| 210 |
source => 'AuthType', |
210 |
source => 'AuthType', |
| 211 |
- |
|
|