X-Git-Url: http://koha-dev.rot13.org:8081/gitweb/?a=blobdiff_plain;f=opac%2Fopac-addbybiblionumber.pl;h=004577d313fd95d2ddff05c11ed1be0d96ffe656;hb=26b2bd1fe02012115a5bf9736e8d446f4bc52a9e;hp=bea130d8c24c785397d72a78aba87cb0fa7e4da0;hpb=0486d0c6b781fbda73df19eb825ef330bdc4544a;p=koha_fer diff --git a/opac/opac-addbybiblionumber.pl b/opac/opac-addbybiblionumber.pl index bea130d8c2..004577d313 100755 --- a/opac/opac-addbybiblionumber.pl +++ b/opac/opac-addbybiblionumber.pl @@ -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, @@ -115,12 +115,11 @@ sub HandleShelfNumber { sub HandleSelectedShelf { if($authorized= ShelfPossibleAction( $loggedinuser, $selectedshelf, 'add')){ #adding to specific shelf - my ($singleshelf, $singleshelfname, $singlecategory)= GetShelf($query->param('selectedshelf')); + my ($singleshelf, $singleshelfname)= GetShelf($query->param('selectedshelf')); $template->param( singleshelf => 1, shelfnumber => $singleshelf, shelfname => $singleshelfname, - "category$singlecategory" => 1 ); } } @@ -144,6 +143,10 @@ sub HandleSelect { } sub LoadBib { + #see comment in AddBibliosToShelf + if (scalar(@biblionumber) == 1) { + @biblionumber = (split /\//,$biblionumber[0]); + } for my $bib (@biblionumber) { my $data = GetBiblioData( $bib ); push(@biblios,