X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=C4%2FVirtualShelves%2FPage.pm;h=125a1e6c74b519c2c00627102a8fba6ee300dd6e;hb=26bee7eee7d3e4602bc5e757278f600224fcbdf5;hp=f1ae812181eb17aadcb22cc3b6ab2087d63dd477;hpb=cb9dbbb03540d77dfae841b8e63b9633ab531a5a;p=koha.git

diff --git a/C4/VirtualShelves/Page.pm b/C4/VirtualShelves/Page.pm
index f1ae812181..125a1e6c74 100644
--- a/C4/VirtualShelves/Page.pm
+++ b/C4/VirtualShelves/Page.pm
@@ -61,8 +61,8 @@ sub shelfpage {
     $query            or die "No query";
     $template         or die "No template";
     $template->param(
-	loggedinuser => $loggedinuser,
-	OpacAllowPublicListCreation => C4::Context->preference('OpacAllowPublicListCreation'),
+    loggedinuser => $loggedinuser,
+    OpacAllowPublicListCreation => C4::Context->preference('OpacAllowPublicListCreation'),
     );
     my $edit;
     my $shelves;
@@ -178,7 +178,7 @@ sub shelfpage {
 
   SWITCH: {
         if ($op) {
-	    #Saving modified shelf
+        #Saving modified shelf
             if ( $op eq 'modifsave' ) {
                 unless ($okmanage) {
                         push @paramsloop, { nopermission => $shelfnumber };
@@ -205,8 +205,8 @@ sub shelfpage {
                 }
                 exit;
             }
-	    #Editing a shelf
-            elsif ( $op eq 'modif' ) {
+        #Editing a shelf
+        elsif ( $op eq 'modif' ) {
                 my ( $shelfnumber2, $shelfname, $owner, $category, $sortfield ) = GetShelf($shelfnumber);
                 my $member = GetMember( 'borrowernumber' => $owner );
                 my $ownername = defined($member) ? $member->{firstname} . " " . $member->{surname} : '';
@@ -315,7 +315,7 @@ sub shelfpage {
         if ( $query->param('shelves') ) {
             my $stay = 1;
 
-	    #Add a shelf
+        #Add a shelf
             if ( my $newshelf = $query->param('addshelf') ) {
 
                 # note: a user can always add a new shelf
@@ -335,7 +335,7 @@ sub shelfpage {
                 }
             }
 
-	    #Deleting a shelf (asking for confirmation if it has entries)
+        #Deleting a shelf (asking for confirmation if it has entries)
             foreach ( $query->param() ) {
                 /DEL-(\d+)/ or next;
                 $delflag = 1;