From 64def1c1a56b582c9d07478fc43c418c30050cfd Mon Sep 17 00:00:00 2001
From: erickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Thu, 24 Aug 2006 15:17:17 +0000
Subject: [PATCH] logic error on bool test

git-svn-id: svn://svn.open-ils.org/ILS/trunk@5654 dcc99617-32d9-48b4-a31d-7c20da2025e4
---
 Open-ILS/src/perlmods/OpenILS/SIP/Patron.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Open-ILS/src/perlmods/OpenILS/SIP/Patron.pm b/Open-ILS/src/perlmods/OpenILS/SIP/Patron.pm
index 88259f28e6..b6ed04562c 100644
--- a/Open-ILS/src/perlmods/OpenILS/SIP/Patron.pm
+++ b/Open-ILS/src/perlmods/OpenILS/SIP/Patron.pm
@@ -171,7 +171,7 @@ sub hold_ok {
 # return true if the card provided is marked as lost
 sub card_lost {
     my $self = shift;
-	 return $self->{user}->card->active eq 't';
+	 return $self->{user}->card->active eq 'f';
 }
 
 sub recall_overdue {
-- 
2.11.0