granular permissions - update CGI script for permissions editor

[koha_fer] / members / member-password.pl

diff --git a/members/member-password.pl b/members/member-password.pl
index 183d2d3..4bd4f1f 100755 (executable)
--- a/members/member-password.pl
+++ b/members/member-password.pl
@@ -79,6 +79,8 @@ if ( $newpassword  && ! $errormsg ) {
        my $borrowercategory = GetBorrowercategory( $bor->{'categorycode'} );
 my $category_type = $borrowercategory->{'category_type'};
 ( $template->param( adultborrower => 1 ) ) if ( $category_type eq 'A' );
+my ($picture, $dberror) = GetPatronImage($bor->{'cardnumber'});
+$template->param( picture => 1 ) if $picture;
        
     $template->param( othernames => $bor->{'othernames'},
            surname     => $bor->{'surname'},