|
Lines 292-297
sub run_marc21_search_tests {
Link Here
|
| 292 |
($biblionumber,undef,$title) = FindDuplicate($record); |
292 |
($biblionumber,undef,$title) = FindDuplicate($record); |
| 293 |
is($biblionumber, 51, 'Found duplicate with ISBN'); |
293 |
is($biblionumber, 51, 'Found duplicate with ISBN'); |
| 294 |
|
294 |
|
|
|
295 |
$record = MARC::Record->new; |
| 296 |
$record->add_fields( |
| 297 |
[ '020', ' ', ' ', a => '0465039146' ], |
| 298 |
[ '020', ' ', ' ', a => '9780465039142' ], |
| 299 |
[ '245', '0', '0', a => 'Doesnt matter, searching isbn /' ] |
| 300 |
); |
| 301 |
($biblionumber,undef,$title) = FindDuplicate($record); |
| 302 |
is($biblionumber, 48, 'Found duplicate with ISBN when two ISBNs in record'); |
| 303 |
|
| 295 |
$record = MARC::Record->new; |
304 |
$record = MARC::Record->new; |
| 296 |
|
305 |
|
| 297 |
$record->add_fields( |
306 |
$record->add_fields( |
|
Lines 930-936
sub run_unimarc_search_tests {
Link Here
|
| 930 |
} |
939 |
} |
| 931 |
|
940 |
|
| 932 |
subtest 'MARC21 + DOM' => sub { |
941 |
subtest 'MARC21 + DOM' => sub { |
| 933 |
plan tests => 93; |
942 |
plan tests => 94; |
| 934 |
run_marc21_search_tests(); |
943 |
run_marc21_search_tests(); |
| 935 |
}; |
944 |
}; |
| 936 |
|
945 |
|
|
Lines 941-947
subtest 'UNIMARC + DOM' => sub {
Link Here
|
| 941 |
|
950 |
|
| 942 |
|
951 |
|
| 943 |
subtest 'FindDuplicate' => sub { |
952 |
subtest 'FindDuplicate' => sub { |
| 944 |
plan tests => 6; |
953 |
plan tests => 8; |
| 945 |
Koha::Caches->get_instance('config')->flush_all; |
954 |
Koha::Caches->get_instance('config')->flush_all; |
| 946 |
t::lib::Mocks::mock_preference('marcflavour', 'MARC21' ); |
955 |
t::lib::Mocks::mock_preference('marcflavour', 'MARC21' ); |
| 947 |
mock_GetMarcSubfieldStructure('MARC21'); |
956 |
mock_GetMarcSubfieldStructure('MARC21'); |
|
Lines 970-975
subtest 'FindDuplicate' => sub {
Link Here
|
| 970 |
$record_3->add_fields( |
979 |
$record_3->add_fields( |
| 971 |
[ '245', '0', '0', a => 'Frog and toad all year /' ] |
980 |
[ '245', '0', '0', a => 'Frog and toad all year /' ] |
| 972 |
); |
981 |
); |
|
|
982 |
my $record_4 = MARC::Record->new; |
| 983 |
$record_4 ->add_fields( |
| 984 |
[ '020', ' ', ' ', a => '9780307744432' ], |
| 985 |
[ '020', ' ', ' ', a => '0307744434' ], |
| 986 |
[ '100', '0', '0', a => 'Morgenstern, Erin' ], |
| 987 |
[ '245', '0', '0', a => 'The night circus /' ] |
| 988 |
); |
| 973 |
|
989 |
|
| 974 |
foreach my $engine ('Zebra','Elasticsearch'){ |
990 |
foreach my $engine ('Zebra','Elasticsearch'){ |
| 975 |
t::lib::Mocks::mock_preference('searchEngine', $engine ); |
991 |
t::lib::Mocks::mock_preference('searchEngine', $engine ); |
|
Lines 982-987
subtest 'FindDuplicate' => sub {
Link Here
|
| 982 |
|
998 |
|
| 983 |
warning_is { C4::Search::FindDuplicate($record_3);} |
999 |
warning_is { C4::Search::FindDuplicate($record_3);} |
| 984 |
q/ti,ext:"Frog and toad all year \/"/,"Term correctly formed and passed to $engine"; |
1000 |
q/ti,ext:"Frog and toad all year \/"/,"Term correctly formed and passed to $engine"; |
|
|
1001 |
|
| 1002 |
warning_is { C4::Search::FindDuplicate($record_4);} |
| 1003 |
q/isbn:9780307744432 OR 0307744434/,"Term correctly formed and passed to $engine"; |
| 985 |
} |
1004 |
} |
| 986 |
|
1005 |
|
| 987 |
}; |
1006 |
}; |
| 988 |
- |
|
|