Define an empty array of fields to be checked in the responses

for those messages that don't require any field checking.  This
eliminates "TODO" failures from the test harness.

diff --git a/t/08checkin.t b/t/08checkin.t
index f5e514e..300353d 100644 (file)
--- a/t/08checkin.t
+++ b/t/08checkin.t
@@ -35,6 +35,7 @@ my $checkout_template = {
     id => 'Checkin: prep: check out item',
     msg => '11YN20060329    203000                  AOUWOLS|AAdjfiander|AB1565921879|AC|',
     pat => qr/^121NNY$datepat/,
+    fields => [],
 };
 
 my @tests = (

diff --git a/t/09renew.t b/t/09renew.t
index 6fe1102..7a54069 100644 (file)
--- a/t/09renew.t
+++ b/t/09renew.t
@@ -13,12 +13,14 @@ my $checkout_template = {
     id => 'Renew: prep: check out item',
     msg => '11YN20060329    203000                  AOUWOLS|AAdjfiander|AB1565921879|AC|',
     pat => qr/^121NNY$datepat/,
+    fields => [],
 };
 
 my $checkin_template = {
     id => 'Renew: prep: check in item',
     msg => '09N20060102    08423620060113    084235APUnder the bed|AOUWOLS|AB1565921879|ACterminal password|',
     pat => qr/^10YYNN$datepat/,
+    fields => [],
 };
 
 my $renew_test_template = {

diff --git a/t/10renew_all.t b/t/10renew_all.t
index a3e6717..210207d 100644 (file)
--- a/t/10renew_all.t
+++ b/t/10renew_all.t
@@ -13,18 +13,21 @@ my $enable_template = {
     id => 'Renew All: prep: enable patron permissions',
     msg => '2520060102    084238AOUWOLS|AAdjfiander|',
     pat => qr/^26 {4}[ Y]{10}000$datepat/,
+    fields => [],
 };
 
 my $checkout_template = {
     id => 'Renew All: prep: check out item',
     msg => '11YN20060329    203000                  AOUWOLS|AAdjfiander|AB1565921879|AC|',
     pat => qr/^121NNY$datepat/,
+    fields => [],
 };
 
 my $checkin_template = {
     id => 'Renew All: prep: check in item',
     msg => '09N20060102    08423620060113    084235APUnder the bed|AOUWOLS|AB1565921879|ACterminal password|',
     pat => qr/^10YYNN$datepat/,
+    fields => [],
 };
 
 my $renew_all_test_template = {