X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=members%2Fdeletemem.pl;h=96f62517533d65f4bf1798e5cd7a36ad0f974578;hb=58dccaee26181b42ab3a435e4b84786e3a75bcd3;hp=7bd8e02553bbafca3d8f601a5f72efc077e2246c;hpb=dc2339247bbe60e4f23f4d3993b2774648284674;p=koha.git

diff --git a/members/deletemem.pl b/members/deletemem.pl
index 7bd8e02553..96f6251753 100755
--- a/members/deletemem.pl
+++ b/members/deletemem.pl
@@ -57,6 +57,7 @@ if ( $loggedinuser == $member ) {
 }
 
 my $logged_in_user = Koha::Patrons->find( $loggedinuser ) or die "Not logged in";
+my $patron         = Koha::Patrons->find( $member );
 output_and_exit_if_error( $input, $cookie, $template, { module => 'members', logged_in_user => $logged_in_user, current_patron => $patron } );
 
 # Handle deletion from the Norwegian national patron database, if it is enabled
@@ -76,12 +77,9 @@ if ( C4::Context->preference('NorwegianPatronDBEnable') && C4::Context->preferen
 my $issues = GetPendingIssues($member);     # FIXME: wasteful call when really, we only want the count
 my $countissues = scalar(@$issues);
 
-my $patron = Koha::Patrons->find( $member );
 my $charges = $patron->account->non_issues_charges;
 my $userenv = C4::Context->userenv;
 
- 
-
 if ($patron->category->category_type eq "S") {
     unless(C4::Auth::haspermission($userenv->{'id'},{'staffaccess'=>1})) {
         print $input->redirect("/cgi-bin/koha/members/moremember.pl?borrowernumber=$member&error=CANT_DELETE_STAFF");