Bug 7863 - opac-addbybiblionumber.pl plack scoping
authorDobrica Pavlinusic <dpavlin@rot13.org>
Sat, 31 Mar 2012 22:28:11 +0000 (00:28 +0200)
committerPaul Poulain <paul.poulain@biblibre.com>
Tue, 3 Apr 2012 16:12:37 +0000 (18:12 +0200)
Test scenario:

1. issue search query
2. select 1 result
3. add to: new list, list-1, private
4. select 2 results
5. add to (exiting) list-1
4. select 3 results
6. add to: new list, list-2, public
7. using lists drop-down, view and delete list-1 and list-2

Signed-off-by: Alex Arnaud <alex.arnaud@biblibre.com>
Signed-off-by: Paul Poulain <paul.poulain@biblibre.com>
opac/opac-addbybiblionumber.pl

index bea130d..b1a460e 100755 (executable)
@@ -31,18 +31,18 @@ use C4::VirtualShelves qw/:DEFAULT GetAllShelves/;
 use C4::Output;
 use C4::Auth;
 
-my $query              = new CGI;
-my @biblionumber       = $query->param('biblionumber');
-my $selectedshelf      = $query->param('selectedshelf');
-my $newshelf           = $query->param('newshelf');
-my $shelfnumber        = $query->param('shelfnumber');
-my $newvirtualshelf    = $query->param('newvirtualshelf');
-my $category           = $query->param('category');
-my $authorized          = 1;
-my $errcode            = 0;
-my @biblios;
+our $query             = new CGI;
+our @biblionumber      = $query->param('biblionumber');
+our $selectedshelf     = $query->param('selectedshelf');
+our $newshelf          = $query->param('newshelf');
+our $shelfnumber       = $query->param('shelfnumber');
+our $newvirtualshelf   = $query->param('newvirtualshelf');
+our $category          = $query->param('category');
+our $authorized          = 1;
+our $errcode           = 0;
+our @biblios;
 
-my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
+our ( $template, $loggedinuser, $cookie ) = get_template_and_user(
     {
         template_name   => "opac-addbybiblionumber.tmpl",
         query           => $query,