[Koha-devel] Bugfix for Koha 2.2.0RC2

[Andrés Tarallo]

A few weeks ago we sent this patch for the members-flag.pl, made by 
Ernesto Silva (Universidad ORT - Uruguay).

This patch wasn't applied to the 2.2.0 RC2, nor submited to the CVS. 
Please add it, could be very annoying for the users, specially for 
librarians.

Andres

--- member-flags.pl.original    2004-11-22 09:51:47.696405416 -0300
+++ member-flags.pl     2004-11-22 09:53:25.957467464 -0300
@@ -58,8 +58,14 @@
     $sth->execute($flags, $member);
     print 
$input->redirect("/cgi-bin/koha/members/moremember.pl?bornum=$member");
 } else {
-    my ($bor,$flags,$accessflags)=getpatroninformation(\%env, $member,'');
-
+#----------------------------------------------------------------------------
+# 11-11-2004 - Ernesto Silva (address@hidden) - member flags didn't show up
+# because getpatroninformation returned a complex "borrower" object not a list.
+# More information in: C4/Circulation/Circ2.pm  - line 238
+    my $bor = getpatroninformation(\%env, $member,'');
+    my $flags = $bor->{'flags'};
+    my $accessflags = $bor->{'authflags'};
+#----------------------------------------------------------------------------
     my $dbh=C4::Context->dbh();
     my $sth=$dbh->prepare("select bit,flag,flagdesc from userflags order by 
bit");
     $sth->execute;