From 5c4c2f8dddb46eb1a005b07aded0206286deff38 Mon Sep 17 00:00:00 2001
From: djfiander <djfiander>
Date: Tue, 27 Jun 2006 01:33:45 +0000
Subject: [PATCH] clean up by cancelling the second user's hold.

---
 t/07hold.t | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)

diff --git a/t/07hold.t b/t/07hold.t
index 8f8d2fa..bddb312 100644
--- a/t/07hold.t
+++ b/t/07hold.t
@@ -103,6 +103,24 @@ $test->{pat} = qr/^160N$datepat/;
 
 push @tests, $test, $hold_count_test_template0;
 
+# Cleanup: cancel miker's hold too.
+$test = clone($hold_test_template);
+$test->{id} = "Cancel hold: cleanup second patron's hold";
+$test->{msg} =~ s/\+/-/;
+$test->{msg} =~ s/djfiander/miker/;
+$test->{pat} = qr/^161[NY]$datepat/;
+delete $test->{fields};
+$test->{fields} = [
+		   $SIPtest::field_specs{(FID_INST_ID)},
+		   $SIPtest::field_specs{(FID_SCREEN_MSG)},
+		   $SIPtest::field_specs{(FID_PRINT_LINE)},
+		   { field    => FID_PATRON_ID,
+		     pat      => qr/^miker$/,
+		     required => 1, },
+		   ];
+
+push @tests, $test;
+
 # Place hold: valid patron, item, invalid patron pwd
 $test = clone($hold_test_template);
 $test->{id} = 'Place hold: invalid patron password';
-- 
2.11.0