From dd4288bc9b7e0b911b3cae50e20654f834cee303 Mon Sep 17 00:00:00 2001 From: erickson Date: Mon, 28 Aug 2006 19:33:42 +0000 Subject: [PATCH] checking inactive git-svn-id: svn://svn.open-ils.org/ILS/trunk@5738 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- Open-ILS/src/perlmods/OpenILS/SIP/Patron.pm | 2 ++ 1 file changed, 2 insertions(+) diff --git a/Open-ILS/src/perlmods/OpenILS/SIP/Patron.pm b/Open-ILS/src/perlmods/OpenILS/SIP/Patron.pm index 722a907c7c..8e6431c4c5 100644 --- a/Open-ILS/src/perlmods/OpenILS/SIP/Patron.pm +++ b/Open-ILS/src/perlmods/OpenILS/SIP/Patron.pm @@ -209,6 +209,8 @@ sub screen_msg { return 'barred' if $u->barred eq 't'; my $b = 'blocked'; + + return $b if $u->active eq 'f'; return $b if $u->card->active eq 'f'; if( $u->standing_penalties ) { -- 2.11.0