From 9d5b0e296d8e14153ecbbf49915dd3f135bfc283 Mon Sep 17 00:00:00 2001
From: djfiander <djfiander>
Date: Fri, 2 Jun 2006 00:51:18 +0000
Subject: [PATCH] Fix check renewal permissions check

---
 ILS.pm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/ILS.pm b/ILS.pm
index 864b400..6c1fa18 100644
--- a/ILS.pm
+++ b/ILS.pm
@@ -332,7 +332,7 @@ sub renew {
 	$trans->screen_msg("Invalid patron barcode.");
 
 	return $trans;
-    } elsif ($patron->{renew_ok} eq 'N') {
+    } elsif (!$patron->renew_ok) {
 	
 	$trans->screen_msg("Renewals not allowed.");
 
@@ -377,6 +377,8 @@ sub renew_all {
     $trans = new ILS::Transaction::RenewAll;
     
     $trans->patron($patron = new ILS::Patron $patron_id);
+    syslog("LOG_DEBUG", "ILS::renew_all: patron '%s': renew_ok: %s",
+	   $patron->name, $patron->renew_ok);
 
     if (!defined($patron)) {
 	$trans->screen_msg("Invalid patron barcode.");
-- 
2.11.0