Lines 22-30
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 |
|
24 |
|
25 |
my $search_module = new Test::MockModule('C4::Search'); |
25 |
my $engine = C4::Context->preference("SearchEngine") // 'Zebra'; |
|
|
26 |
my $search_module = new Test::MockModule("Koha::SearchEngine::${engine}::Search"); |
27 |
|
28 |
$search_module->mock('simple_search_compat', \&Mock_simple_search_compat ); |
26 |
|
29 |
|
27 |
$search_module->mock('SimpleSearch', \&Mock_SimpleSearch ); |
|
|
28 |
my $errors; |
30 |
my $errors; |
29 |
my $context = C4::Context->new; |
31 |
my $context = C4::Context->new; |
30 |
|
32 |
|
Lines 95-102
sub _add_biblio_with_isbn {
Link Here
|
95 |
|
97 |
|
96 |
# Mocked subs |
98 |
# Mocked subs |
97 |
|
99 |
|
98 |
# C4::Search::SimpleSearch |
100 |
# Koha::SearchEngine::${SearchEngine}::Search::simple_search_compat |
99 |
sub Mock_SimpleSearch { |
101 |
sub Mock_simple_search_compat { |
|
|
102 |
my $self = shift; |
100 |
my $query = shift; |
103 |
my $query = shift; |
101 |
my @results; |
104 |
my @results; |
102 |
|
105 |
|
103 |
- |
|
|