fixed reference to branchrelations.categorycode

[koha_fer] / virtualshelves / shelves.pl

diff --git a/virtualshelves/shelves.pl b/virtualshelves/shelves.pl
index ad2dce6..99d739b 100755 (executable)
--- 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 );
@@ -195,7 +198,7 @@ SWITCH: {
     }
 }
 
-my $shelflist = GetShelves( $loggedinuser, 2 );
+$shelflist = GetShelves( $loggedinuser, 2 );
 my $color = '';
 my @shelvesloop;
 my $numberCanManage = 0;
@@ -221,7 +224,6 @@ foreach my $element ( sort keys %$shelflist ) {
 
 $template->param(
     shelvesloop     => \@shelvesloop,
-
     numberCanManage => $numberCanManage,
 );
 
@@ -280,7 +282,6 @@ sub shelves {
 }
 
 #
-# $Log$
 # Revision 1.13  2007/04/24 13:54:29  hdl
 # functions that were in C4::Interface::CGI::Output are now in C4::Output.
 # So this implies quite a change for files.