From 6d89c4aeabcd6da8eeed3034f848e029c51c0b23 Mon Sep 17 00:00:00 2001 From: Paul POULAIN Date: Wed, 28 Nov 2007 16:00:56 -0600 Subject: [PATCH] fixing virtual shelves (unfinished) Signed-off-by: Chris Cormack Signed-off-by: Joshua Ferraro --- virtualshelves/shelves.pl | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/virtualshelves/shelves.pl b/virtualshelves/shelves.pl index 30cb1c8075..f6615451c0 100755 --- a/virtualshelves/shelves.pl +++ b/virtualshelves/shelves.pl @@ -87,7 +87,6 @@ if ( $query->param('modifyshelfcontents') ) { my $barcode = $query->param('addbarcode'); my ($item) = GetItem( 0, $barcode ); my ($biblio) = GetBiblioFromItemNumber($item->{'itemnumber'}); - if ( ShelfPossibleAction( $loggedinuser, $shelfnumber, 'manage' ) ) { AddToShelf( $biblio->{'biblionumber'}, $shelfnumber ); foreach ( $query->param ) { @@ -158,6 +157,8 @@ SWITCH: { } ); } + print $query->redirect("/cgi-bin/koha/virtualshelves/shelves.pl?viewshelf=$shelfnumber"); + exit; } my @paramsloop; foreach ( $query->param() ) { @@ -169,10 +170,12 @@ SWITCH: { $line{'status'} = $status; $line{'count'} = $count; } + print $query->redirect("/cgi-bin/koha/virtualshelves/shelves.pl"); + exit; } #if the shelf is not deleted, %line points on null - push( @paramsloop, \%line ); +# push( @paramsloop, \%line ); } $template->param( paramsloop => \@paramsloop ); my ($shelflist) = GetShelves( $loggedinuser, 2 ); -- 2.39.5