X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=circ%2Fbranchtransfers.pl;h=2c8612c1cc9ffaf1761c7e663de740a5d5f3a57e;hb=2d4d65d526e6f54a40ddec87a6d3207722234fd3;hp=ad7aa9afd5e4babe6dbd24d0b4aab6a32974c9c7;hpb=47b7b91d148faa62a8d0bb257bec2b3fa716d234;p=koha.git diff --git a/circ/branchtransfers.pl b/circ/branchtransfers.pl index ad7aa9afd5..2c8612c1cc 100755 --- a/circ/branchtransfers.pl +++ b/circ/branchtransfers.pl @@ -22,7 +22,7 @@ use strict; use warnings; -use CGI; +use CGI qw ( -utf8 ); use C4::Circulation; use C4::Output; use C4::Reserves; @@ -53,7 +53,7 @@ if (!C4::Context->userenv){ # Make the page ..... my ($template, $user, $cookie) = get_template_and_user( { - template_name => "circ/branchtransfers.tmpl", + template_name => "circ/branchtransfers.tt", query => $query, type => "intranet", authnotrequired => 0, @@ -80,7 +80,10 @@ my $ignoreRs = 0; # Deal with the requests.... if ( $request eq "KillWaiting" ) { my $item = $query->param('itemnumber'); - CancelReserve( 0, $item, $borrowernumber ); + CancelReserve({ + itemnumber => $item, + borrowernumber => $borrowernumber + }); $cancelled = 1; $reqmessage = 1; } @@ -93,7 +96,10 @@ elsif ( $request eq "SetWaiting" ) { } elsif ( $request eq 'KillReserved' ) { my $biblio = $query->param('biblionumber'); - CancelReserve( $biblio, 0, $borrowernumber ); + CancelReserve({ + biblionumber => $biblio, + borrowernumber => $borrowernumber + }); $cancelled = 1; $reqmessage = 1; }