From 288bbecf2f515b3056ce62438b36aece94bd2498 Mon Sep 17 00:00:00 2001
From: "Joe Atzberger (siptest" <atz4sip@arwen.metavore.com>
Date: Fri, 5 Sep 2008 17:50:15 -0500
Subject: [PATCH] Correct application of noissues flag in SIP.

Signed-off-by: Galen Charlton <galen.charlton@liblime.com>
---
 C4/SIP/ILS/Patron.pm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/C4/SIP/ILS/Patron.pm b/C4/SIP/ILS/Patron.pm
index 65c17dab7f..498c70e3db 100644
--- a/C4/SIP/ILS/Patron.pm
+++ b/C4/SIP/ILS/Patron.pm
@@ -92,7 +92,9 @@ sub new {
 		($flags->{$_}) or next;
 		$ilspatron{screen_msg} .= ($flags->{$_}->{message} || '') ;
 		if ($flags->{$_}->{noissues}){
-			$ilspatron{qw(charge_ok renew_ok recall_ok hold_ok)} = (0,0,0,0);
+			foreach my $toggle (qw(charge_ok renew_ok recall_ok hold_ok)) {
+				$ilspatron{$toggle} = 0;
+			}
 		}
 	}
 
-- 
2.39.5