|
Lines 880-886
subtest 'suggestions() tests' => sub {
Link Here
|
| 880 |
|
880 |
|
| 881 |
subtest 'get_marc_components() tests' => sub { |
881 |
subtest 'get_marc_components() tests' => sub { |
| 882 |
|
882 |
|
| 883 |
plan tests => 5; |
883 |
plan tests => 6; |
| 884 |
|
884 |
|
| 885 |
$schema->storage->txn_begin; |
885 |
$schema->storage->txn_begin; |
| 886 |
|
886 |
|
|
Lines 929-934
subtest 'get_marc_components() tests' => sub {
Link Here
|
| 929 |
); |
929 |
); |
| 930 |
$search_mod->unmock('search_compat'); |
930 |
$search_mod->unmock('search_compat'); |
| 931 |
|
931 |
|
|
|
932 |
my $record = MARC::Record->new; |
| 933 |
$record->append_fields( MARC::Field->new( '245', ' ', ' ', a => 'Some title' ) ); |
| 934 |
|
| 935 |
my ($biblio_id) = AddBiblio( $record, qw{} ); |
| 936 |
my $biblio = Koha::Biblios->find($biblio_id); |
| 937 |
|
| 938 |
t::lib::Mocks::mock_preference( 'marcflavour', 'MARC21' ); |
| 939 |
t::lib::Mocks::mock_preference( 'UseControlNumber', 1 ); |
| 940 |
t::lib::Mocks::mock_preference( 'SearchEngine', 'Elasticsearch' ); |
| 941 |
|
| 942 |
warning_is { $components = $biblio->get_marc_components(1) } |
| 943 |
q{}, 'No warning expected'; |
| 944 |
|
| 932 |
$schema->storage->txn_rollback; |
945 |
$schema->storage->txn_rollback; |
| 933 |
}; |
946 |
}; |
| 934 |
|
947 |
|
| 935 |
- |
|
|