relax magnetic media matching

Signed-off-by: Jason Etheridge <jason@EquinoxOLI.org>

diff --git a/t/09renew.t b/t/09renew.t
index d1f90dc..eb1448c 100755 (executable)
--- a/t/09renew.t
+++ b/t/09renew.t
@@ -101,7 +101,7 @@ my $test;
 ## Renew: Item checked out, but another patron has placed a hold
 #$test = clone($renew_test_template);
 #$test->{id} = 'Renew: Item has outstanding hold';
-#$test->{pat} = qr/^300NUN$datepat/;
+#$test->{pat} = qr/^300N[NU]N$datepat/;
 #foreach my $field (@{$test->{fields}}) {
 #    if ($field->{field} eq FID_DUE_DATE || $field->{field} eq FID_TITLE_ID) {
 #      $field->{pat} = qr/^$/;
@@ -114,7 +114,7 @@ my $test;
 # for the leader test.
 $test = clone($renew_test_template);
 $test->{id} = 'Renew: item not checked out at all';
-$test->{pat} = qr/^300NUN$datepat/;
+$test->{pat} = qr/^300N[NU]N$datepat/;
 foreach my $field (@{$test->{fields}}) {
     if ($field->{field} eq FID_DUE_DATE) {
        $field->{pat} = qr/^$/;
@@ -128,7 +128,7 @@ push @tests, $checkin_template, $test;
 $test = clone($renew_test_template);
 $test->{id} = 'Renew: Invalid item';
 $test->{msg} =~ s/AB[^|]+/ABbad-item/;
-$test->{pat} = qr/^300NUN$datepat/;
+$test->{pat} = qr/^300N[NU]N$datepat/;
 foreach my $field (@{$test->{fields}}) {
     if ($field->{field} eq FID_TITLE_ID || $field->{field} eq FID_DUE_DATE) {
        $field->{pat} = qr/^$/;
@@ -142,7 +142,7 @@ push @tests, $test;
 $test = clone($renew_test_template);
 $test->{id} = 'Renew: Invalid user';
 $test->{msg} =~ s/AA$user_barcode/AAbad_barcode/;
-$test->{pat} = qr/^300NUN$datepat/;
+$test->{pat} = qr/^300N[NU]N$datepat/;
 foreach my $field (@{$test->{fields}}) {
     if ($field->{field} eq FID_DUE_DATE) {
        $field->{pat} = qr/^$/;