Fix to get list of overdue items showing correctly

diff --git a/C4/Circulation/Circ2.pm b/C4/Circulation/Circ2.pm
index 2d56c4e..d290993 100755 (executable)
--- a/C4/Circulation/Circ2.pm
+++ b/C4/Circulation/Circ2.pm
@@ -504,6 +504,7 @@ sub returnbook {
        doreturn($borrower->{'borrowernumber'}, $iteminformation->{'itemnumber'});
        $messages->{'WasReturned'};
     }
+    ($borrower) = getpatroninformation(\%env, $currentborrower, 0);
 # transfer book
     my ($transfered, $mess, $item) = transferbook($branch, $barcode);
     if ($transfered) {

diff --git a/circ/returns.pl b/circ/returns.pl
index b24126f..6225375 100755 (executable)
--- a/circ/returns.pl
+++ b/circ/returns.pl
@@ -321,6 +321,7 @@ EOF
            my $itemsoverdue = '';
            my $items = $flags->{$flag}->{'itemlist'};
             foreach my $item (sort {$a->{'date_due'} cmp $b->{'date_due'}} @$items) {
+               my ($iteminformation) = getiteminformation(\%env, $item->{'itemnumber'}, 0);
                 $itemsoverdue .=  <<"EOF";
 <font color=red>$item->{'date_due'}</font>
 <a href=/cgi-bin/koha/detail.pl?bib=$iteminformation->{'biblionumber'}&type=intra