From 47a6ecf45cdda4fa9528e8cbc3111dfade9988d5 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) --- C4/SIP/ILS/Patron.pm | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) diff --git a/C4/SIP/ILS/Patron.pm b/C4/SIP/ILS/Patron.pm index 2b0b443..95981fb 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 -- 1.7.4.1