From 0177ed160250ec08825deb54e1bd194cda07709d Mon Sep 17 00:00:00 2001 From: Ian Walls Date: Mon, 2 Jan 2012 11:06:13 -0500 Subject: [PATCH] Bug 7396: Debarred message not showing over SIP2 Corrects typo in list of flags; was DEBARRED, but the actual name of the flag is DBARRED (for some reason) Signed-off-by: Chris Cormack Signed-off-by: Paul Poulain (cherry picked from commit 000047769f12c55d59e444041ddcc0aaf5613fe4) Signed-off-by: Chris Nighswonger --- C4/SIP/ILS/Patron.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/C4/SIP/ILS/Patron.pm b/C4/SIP/ILS/Patron.pm index 2b0b443f0c..95981fb227 100644 --- a/C4/SIP/ILS/Patron.pm +++ b/C4/SIP/ILS/Patron.pm @@ -110,7 +110,7 @@ sub new { ); } $debug and warn "patron fines: $ilspatron{fines} ... amountoutstanding: $kp->{amountoutstanding} ... CHARGES->amount: $flags->{CHARGES}->{amount}"; - for (qw(EXPIRED CHARGES CREDITS GNA LOST DEBARRED NOTES)) { + for (qw(EXPIRED CHARGES CREDITS GNA LOST DBARRED NOTES)) { ($flags->{$_}) or next; if ($_ ne 'NOTES' and $flags->{$_}->{message}) { $ilspatron{screen_msg} .= " -- " . $flags->{$_}->{message}; # show all but internal NOTES -- 2.39.5