From 624ce904e9265b11a0e98cfc4ec34f6afc2e5ad9 Mon Sep 17 00:00:00 2001
From: djfiander <djfiander>
Date: Thu, 31 Aug 2006 21:53:18 +0000
Subject: [PATCH] Cope with trailing whitespace on the titles returned from the
 ILS, since that seems to be a problem for PINES

---
 t/03checkout.t  | 6 +++---
 t/08checkin.t   | 2 +-
 t/09renew.t     | 6 +++---
 t/11item_info.t | 2 +-
 4 files changed, 8 insertions(+), 8 deletions(-)

diff --git a/t/03checkout.t b/t/03checkout.t
index af05b68..da9dd28 100644
--- a/t/03checkout.t
+++ b/t/03checkout.t
@@ -48,7 +48,7 @@ my $checkout_test_template = {
 		 pat      => qr/^$item_barcode$/o,
 		 required => 1, },
 	       { field    => FID_TITLE_ID,
-		 pat      => qr/^$item_title$/o,
+		 pat      => qr/^$item_title\s*$/o,
 		 required => 1, },
 	       { field    => FID_DUE_DATE,
 		 pat      => $textpat,
@@ -111,7 +111,7 @@ foreach my $i (0 .. (scalar @{$test->{fields}})-1) {
     if ($field->{field} eq FID_ITEM_ID) {
 	$field->{pat} = qr/^$item_diacritic_barcode$/;
     } elsif ($field->{field} eq FID_TITLE_ID) {
-	$field->{pat} = qr/^$item_diacritic_title$/;
+	$field->{pat} = qr/^$item_diacritic_title\s*$/;
     } elsif ($field->{field} eq FID_OWNER) {
 	$field->{pat} = qr/^$item_diacritic_owner$/;
     }
@@ -170,7 +170,7 @@ $test->{fields} = [
 		     pat      => qr/^$item_barcode$/o,
 		     required => 1, },
 		   { field    => FID_TITLE_ID,
-		     pat      => qr/^$item_title$/o,
+		     pat      => qr/^$item_title\s*$/o,
 		     required => 1, },
 		   { field    => FID_DUE_DATE,
 		     pat      => qr/^$/,
diff --git a/t/08checkin.t b/t/08checkin.t
index fd63f29..395cda5 100644
--- a/t/08checkin.t
+++ b/t/08checkin.t
@@ -28,7 +28,7 @@ my $checkin_test_template = {
 		 pat      => $textpat,
 		 required => 1, },
 	       { field    => FID_TITLE_ID,
-		 pat      => qr/^$item_title$/o,
+		 pat      => qr/^$item_title\s*$/o,
 		 required => 1, }, # not required by the spec.
 	       ],};
 
diff --git a/t/09renew.t b/t/09renew.t
index d756303..ad9fb06 100644
--- a/t/09renew.t
+++ b/t/09renew.t
@@ -54,7 +54,7 @@ my $renew_test_template = {
 					pat      => qr/^$item_barcode$/,
 					required => 1, },
 				      { field    => FID_TITLE_ID,
-					pat      => qr/^$item_title$/,
+					pat      => qr/^$item_title\s*$/,
 					required => 1, },
 				      { field    => FID_DUE_DATE,
 					pat      => qr/^$datepat$/,
@@ -101,7 +101,7 @@ foreach my $field (@{$test->{fields}}) {
     if ($field->{field} eq FID_DUE_DATE) {
 	$field->{pat} = qr/^$/;
     } elsif ($field->{field} eq FID_TITLE_ID) {
-	$field->{pat} = qr/^($item_title|)$/;
+	$field->{pat} = qr/^($item_title\s*|)$/;
     }
 }
 
@@ -131,7 +131,7 @@ foreach my $field (@{$test->{fields}}) {
     } elsif ($field->{field} eq FID_PATRON_ID) {
 	$field->{pat} = qr/^berick$/;
     } elsif ($field->{field} eq FID_TITLE_ID) {
-	$field->{pat} = qr/^($item_title|)$/;
+	$field->{pat} = qr/^($item_title\s*|)$/;
     }
 }
 
diff --git a/t/11item_info.t b/t/11item_info.t
index 2a1fec7..a0d7ad2 100644
--- a/t/11item_info.t
+++ b/t/11item_info.t
@@ -21,7 +21,7 @@ my $item_info_test_template = {
 		 pat      => qr/^$item_barcode$/,
 		 required => 1, },
 	       { field    => FID_TITLE_ID,
-		 pat      => qr/^$item_title$/,
+		 pat      => qr/^$item_title\s*$/,
 		 required => 1, },
 	       { field    => FID_MEDIA_TYPE,
 		 pat      => qr/^\d{3}$/,
-- 
2.11.0