Lines 12-18
use YAML;
Link Here
|
12 |
use C4::Debug; |
12 |
use C4::Debug; |
13 |
require C4::Context; |
13 |
require C4::Context; |
14 |
|
14 |
|
15 |
use Test::More tests => 212; |
15 |
use Test::More tests => 216; |
16 |
use Test::MockModule; |
16 |
use Test::MockModule; |
17 |
use MARC::Record; |
17 |
use MARC::Record; |
18 |
use File::Spec; |
18 |
use File::Spec; |
Lines 742-747
sub run_marc21_search_tests {
Link Here
|
742 |
); |
742 |
); |
743 |
is($count, 1, 'MARC21 authorities: one hit on match contains "沙士北亞威廉姆"'); |
743 |
is($count, 1, 'MARC21 authorities: one hit on match contains "沙士北亞威廉姆"'); |
744 |
|
744 |
|
|
|
745 |
$UseQueryParser = 1; |
746 |
|
747 |
($auths, $count) = SearchAuthorities( |
748 |
['mainentry'], ['and'], [''], ['starts'], |
749 |
['shakespeare'], 0, 10, '', '', 1 |
750 |
); |
751 |
is($count, 1, 'MARC21 authorities: one hit on mainentry starts with "shakespeare" (QP)'); |
752 |
($auths, $count) = SearchAuthorities( |
753 |
['match'], ['and'], [''], ['contains'], |
754 |
['沙士北亞威廉姆'], 0, 10, '', '', 1 |
755 |
); |
756 |
is($count, 1, 'MARC21 authorities: one hit on match contains "沙士北亞威廉姆" (QP)'); |
757 |
|
758 |
|
745 |
cleanup(); |
759 |
cleanup(); |
746 |
} |
760 |
} |
747 |
|
761 |
|
748 |
- |
|
|