Deleting Date::Manip
[koha_fer] / acqui / neworderempty.pl
index 09c2f4f..d1a21a5 100755 (executable)
@@ -76,7 +76,6 @@ use C4::Biblio;
 use C4::Output;
 use C4::Input;
 use C4::Koha;
-use C4::Interface::CGI::Output;
 use C4::Branch; # GetBranches
 use C4::Members;
 
@@ -185,7 +184,7 @@ foreach my $thisbranch ( sort keys %$branches ) {
 $template->param( branchloop => \@branchloop );
 
 # build bookfund list
-my $borrower= GetBorrower($loggedinuser);
+my $borrower= GetMember($loggedinuser);
 my ( $flags, $homebranch )= ($borrower->{'flags'},$borrower->{'branchcode'});
 
 my $count2;