@@ -, +, @@ compliant --- acqui/basket.pl | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) --- a/acqui/basket.pl +++ a/acqui/basket.pl @@ -69,13 +69,13 @@ the supplier this script have to display the basket. =cut -my $query = new CGI; +our $query = new CGI; our $basketno = $query->param('basketno'); -my $ean = $query->param('ean'); -my $booksellerid = $query->param('booksellerid'); +our $ean = $query->param('ean'); +our $booksellerid = $query->param('booksellerid'); my $duplinbatch = $query->param('duplinbatch'); -my ( $template, $loggedinuser, $cookie, $userflags ) = get_template_and_user( +our ( $template, $loggedinuser, $cookie, $userflags ) = get_template_and_user( { template_name => "acqui/basket.tt", query => $query, @@ -86,7 +86,7 @@ my ( $template, $loggedinuser, $cookie, $userflags ) = get_template_and_user( } ); -my $basket = GetBasket($basketno); +our $basket = GetBasket($basketno); $booksellerid = $basket->{booksellerid} unless $booksellerid; my $bookseller = Koha::Acquisition::Booksellers->find( $booksellerid ); my $schema = Koha::Database->new()->schema(); @@ -112,7 +112,7 @@ unless (CanUserManageBasket($loggedinuser, $basket, $userflags)) { # warn "=>".$basket->{booksellerid}; my $op = $query->param('op') // 'list'; -my $confirm_pref= C4::Context->preference("BasketConfirmations") || '1'; +our $confirm_pref= C4::Context->preference("BasketConfirmations") || '1'; $template->param( skip_confirm_reopen => 1) if $confirm_pref eq '2'; my @messages; --