X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=C4%2FPrint.pm;h=69986dc74078c7a3ddb400fac369250817ffb2e6;hb=c3aed6b007235820284aa016c893799ebbfb30db;hp=582ecdef96dea17f4675602c626302bd5db95729;hpb=c80b328aaeec50a765c6a127e422ac41ceca629a;p=koha.git diff --git a/C4/Print.pm b/C4/Print.pm index 582ecdef96..69986dc740 100644 --- a/C4/Print.pm +++ b/C4/Print.pm @@ -177,9 +177,9 @@ EOF #' sub printslip ($) { - my ( $borrowernumber ) = shift; - my ( $borrower ) = GetMemberDetails( $borrowernumber); - my ($countissues,$issueslist) = GetPendingIssues($borrowernumber); + my $borrowernumber = shift; + my $borrower = GetMemberDetails($borrowernumber); + my $issueslist = GetPendingIssues($borrowernumber); foreach my $it (@$issueslist){ $it->{'date_due'}=format_date($it->{'date_due'}); }