From 323de144ca7bda046733b43619461c3ed3409acb Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Fr=C3=A9d=C3=A9ric=20Demians?= Date: Mon, 19 Sep 2011 19:53:38 +0200 Subject: [PATCH] [SIGNED-OFF] Bug 6885 Allow superlib to delete items from any library Content-Type: text/plain; charset="utf-8" When IndependantBranches syspref is enabled, a 'regular' user can only delete items belonging to his/her library. But a superlibrarian should have the permission to delete items from all libraries. He can't for the time being. This is fix by this patch. How to test? - On a multi-libraries Koha, activate IndependantBranches - Log in with a superlibrarian user - Find a biblio with one item from another library than the user home library - Click on Edit > Edit Items - On the list of items, all lines have Delete link - If you try to delete an item from another library than the user home library, deletion will fail. Signed-off-by: Owen Leonard --- C4/Items.pm | 6 +++++- 1 files changed, 5 insertions(+), 1 deletions(-) diff --git a/C4/Items.pm b/C4/Items.pm index 2e85130..8781c7d 100644 --- a/C4/Items.pm +++ b/C4/Items.pm @@ -2103,7 +2103,11 @@ sub DelItemCheck { if ($onloan) { $error = "book_on_loan"; } - elsif (C4::Context->preference("IndependantBranches") and (C4::Context->userenv->{branch} ne $item->{C4::Context->preference("HomeOrHoldingBranch")||'homebranch'})){ + elsif ( C4::Context->userenv->{flags} % 2 != 1 and + C4::Context->preference("IndependantBranches") and + (C4::Context->userenv->{branch} ne + $item->{C4::Context->preference("HomeOrHoldingBranch")||'homebranch'}) ) + { $error = "not_same_branch"; } else { -- 1.7.3