|
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 |
- |
|
|