From: Jason Etheridge Date: Thu, 24 Nov 2022 05:34:16 +0000 (-0500) Subject: just warn for the weird diacritics from SIPServer X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=2c581391b54b2629f89d12bb0c1e9c97f2a46b69;p=working%2FSIPServer.git just warn for the weird diacritics from SIPServer Signed-off-by: Jason Etheridge --- diff --git a/t/03checkout.t b/t/03checkout.t index 7702b03..07722ee 100755 --- a/t/03checkout.t +++ b/t/03checkout.t @@ -128,11 +128,12 @@ foreach my $i (0 .. (scalar @{$test->{fields}})-1) { my $field = $test->{fields}[$i]; if ($field->{field} eq FID_ITEM_ID) { - $field->{pat} = qr/^$item_diacritic_barcode$/; + $field->{pat} = qr/^$item_diacritic_barcode$/; } elsif ($field->{field} eq FID_TITLE_ID) { - $field->{pat} = qr/^$item_diacritic_title\s*$/; + $field->{pat} = qr/^$item_diacritic_title\s*$/; + $field->{just_warn} = 1; } elsif ($field->{field} eq FID_OWNER) { - $field->{pat} = qr/^$item_diacritic_owner$/; + $field->{pat} = qr/^$item_diacritic_owner$/; } }