Fix for Bug 5974 - Bogus auth check for "StaffMember" role

[koha_fer] / members / member.pl

diff --git a/members/member.pl b/members/member.pl
index e2a6ef5..d759c31 100755 (executable)
--- a/members/member.pl
+++ b/members/member.pl
@@ -104,7 +104,7 @@ my ($count,$results);
 if ($member || keys %$patron) {
     #($results)=Search($member || $patron,{surname=>1,firstname=>1},[$from,$to],undef,["firstname","surname","email","othernames"]  );
     my $search_scope = ( $quicksearch ? "field_start_with" : "start_with" );
-    ($results) = Search( $member || $patron, \@orderby, undef, undef, [ "firstname", "surname", "othernames", "cardnumber", "userid" ], $search_scope );
+    ($results) = Search( $member || $patron, \@orderby, undef, undef, [ "firstname", "surname", "othernames", "cardnumber", "userid", "email" ], $search_scope );
 }
 
 if ($results) {