HUGE COMMIT : code cleaning circulation.

[koha.git] / members / deletemem.pl

diff --git a/members/deletemem.pl b/members/deletemem.pl
index 58c3607..32f6f57 100755 (executable)
--- a/members/deletemem.pl
+++ b/members/deletemem.pl
@@ -30,7 +30,7 @@ use CGI;
 use C4::Context;
 use C4::Interface::CGI::Output;
 use C4::Output;
-use C4::Circulation::Circ2;
+use C4::Circulation;
 use C4::Auth;
 use C4::Members;
 
@@ -49,12 +49,12 @@ my %env;
 $env{'nottodayissues'}=1;
 my %member2;
 $member2{'borrowernumber'}=$member;
-my $issues=currentissues(\%env,\%member2);
+my $issues=GetBorrowerIssues(\%member2);
 my $i=0;
 foreach (sort keys %$issues) {
        $i++;
 }
-my ($bor,$flags)=getpatroninformation(\%env, $member,'');
+my ($bor,$flags)=GetMemberDetails($member,'');
 if (C4::Context->preference("IndependantBranches")) {
        my $userenv = C4::Context->userenv;
        unless ($userenv->{flags} == 1){