diff --git a/t/Serials/ModSerialStatus.t b/t/Serials/ModSerialStatus.t index 2c1cd6be30..ba0041eb2b 100755 --- a/t/Serials/ModSerialStatus.t +++ b/t/Serials/ModSerialStatus.t @@ -23,7 +23,7 @@ use Modern::Perl; use Data::Dumper qw/Dumper/; use Test::NoWarnings; -use Test::More tests => 9; +use Test::More tests => 10; use C4::Serials; @@ -33,6 +33,7 @@ is( C4::Serials::_handle_seqno( '2017 (No. 8)', $list ), $list, is( C4::Serials::_handle_seqno( '2017 (No. 9)', $list ), $list, 'Not added 9' ); is( C4::Serials::_handle_seqno( '2017 (No. 10)', $list ), $list, 'Not added 10' ); is( C4::Serials::_handle_seqno( '2017 (No. 11)', $list ), $list . '; 2017 (No. 11)', 'Added 11' ); +is( C4::Serials::_handle_seqno( '{1}', $list ), $list . '; {1}', 'Added {1}' ); is( C4::Serials::_handle_seqno( '2017 (No. 7)', $list, 'REMOVE' ), $list, 'Not removed 7' ); is( C4::Serials::_handle_seqno( '2017 (No. 10)', $list, 'REMOVE' ) !~ /\(10\)/, 1, 'Removed 10' ); is( C4::Serials::_handle_seqno( '2017 (No. 8)', $list, 'CHECK' ), 1, 'Found 8' );