X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=C4%2FVirtualShelves.pm;h=5e1c3f4d578eea01159d1b1e4bdf0cd40c2db4a3;hb=2eac2e7242aa2685df8f511c49bbf50cb55be4fd;hp=eda6840cbc308cd9f8ea8fc23904c000ddbf3438;hpb=8ad2c7d7acc3cb0033426bd78928214a22ad9dd1;p=koha.git diff --git a/C4/VirtualShelves.pm b/C4/VirtualShelves.pm index eda6840cbc..5e1c3f4d57 100644 --- a/C4/VirtualShelves.pm +++ b/C4/VirtualShelves.pm @@ -17,9 +17,9 @@ package C4::VirtualShelves; # WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR # A PARTICULAR PURPOSE. See the GNU General Public License for more details. # -# You should have received a copy of the GNU General Public License along with -# Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place, -# Suite 330, Boston, MA 02111-1307 USA +# You should have received a copy of the GNU General Public License along +# with Koha; if not, write to the Free Software Foundation, Inc., +# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. use strict; use warnings; @@ -476,6 +476,7 @@ sub ShelfPossibleAction { $sth->execute($shelfnumber); my ( $owner, $category ) = $sth->fetchrow; my $borrower = GetMemberDetails($user); + return 0 if not defined($user); return 1 if ( $category >= 3); # open list return 1 if (($category >= 2) and defined($action) and $action eq 'view'); # public list, anybody can view