diff --git a/circ/circulation.pl b/circ/circulation.pl index c70ef4b2a9..36462434af 100755 --- a/circ/circulation.pl +++ b/circ/circulation.pl @@ -192,9 +192,7 @@ sub decode { sub returns { my %returneditems; - print << "EOF"; -
Circulation - Returns
-EOF + print "Circulation: Returns
"; foreach ($query->param) { (next) unless (/ri-(\d*)/); my $counter=$1; @@ -420,6 +418,7 @@ EOF } sub issues { + my ($noheader) = shift; my $print=$query->param('print'); my $borrowernumber=$query->param('borrnumber'); @@ -467,9 +466,10 @@ sub issues { Next Borrower || Returns || - Transfer Book

+ Transfers

+Circulation: Issues
EOF } if (my $borrnumber=$query->param('borrnumber')) {