From 9c4fb6c82566f719cc68dac1ab069f8497791270 Mon Sep 17 00:00:00 2001
From: tonnesen <tonnesen>
Date: Fri, 6 Sep 2002 16:21:07 +0000
Subject: [PATCH] Bug fix... user access flags were not getting set properly in
 sub getpatroninformation.

---
 C4/Circulation/Circ2.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/C4/Circulation/Circ2.pm b/C4/Circulation/Circ2.pm
index 2119bc803e..4b3de2172a 100755
--- a/C4/Circulation/Circ2.pm
+++ b/C4/Circulation/Circ2.pm
@@ -142,7 +142,7 @@ sub getpatroninformation {
     $sth=$dbh->prepare("select bit,flag from userflags");
     $sth->execute;
     while (my ($bit, $flag) = $sth->fetchrow) {
-	if ($flags & 2**$bit) {
+	if ($borrower->{'flags'} & 2**$bit) {
 	    $accessflagshash->{$flag}=1;
 	}
     }
-- 
2.39.5