From 8c32b44df5b0500286115eae0d463141ceec1c7b Mon Sep 17 00:00:00 2001 From: Thibaud Guillot Date: Tue, 16 Jan 2024 17:01:58 +0100 Subject: [PATCH] Bug 30230: (follow-up) Add list permission on home-search include and update atomic update file Signed-off-by: Martin Renvoize Signed-off-by: Katrin Fischer --- .../bug_30230_add-new-list-borrowers-permission.pl | 4 ++-- koha-tmpl/intranet-tmpl/prog/en/includes/home-search.inc | 2 +- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/installer/data/mysql/atomicupdate/bug_30230_add-new-list-borrowers-permission.pl b/installer/data/mysql/atomicupdate/bug_30230_add-new-list-borrowers-permission.pl index 88772b4886..e03bf2135f 100755 --- a/installer/data/mysql/atomicupdate/bug_30230_add-new-list-borrowers-permission.pl +++ b/installer/data/mysql/atomicupdate/bug_30230_add-new-list-borrowers-permission.pl @@ -1,14 +1,14 @@ use Modern::Perl; return { - bug_number => "BUG_30230", + bug_number => "30230", description => "Add new list_borrowers permission", up => sub { my ($args) = @_; my ( $dbh, $out ) = @$args{qw(dbh out)}; $dbh->do( - "INSERT IGNORE INTO permissions (module_bit, code, description) VALUES (4, 'list_borrowers', 'Search and list patrons')" + "INSERT IGNORE INTO permissions (module_bit, code, description) VALUES (4, 'list_borrowers', 'Search, list and view patrons')" ); say $out "Added new permission 'list_borrowers'"; diff --git a/koha-tmpl/intranet-tmpl/prog/en/includes/home-search.inc b/koha-tmpl/intranet-tmpl/prog/en/includes/home-search.inc index f1041101b7..0a5ec44c8b 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/includes/home-search.inc +++ b/koha-tmpl/intranet-tmpl/prog/en/includes/home-search.inc @@ -4,7 +4,7 @@ [% IF ( CAN_user_circulate_circulate_remaining_permissions ) %] [% circ_active_tab = 1 %] [% circ_active = "active" %] - [% ELSIF ( CAN_user_borrowers_edit_borrowers ) %] + [% ELSIF ( CAN_user_borrowers_edit_borrowers ) || ( CAN_user_borrowers_list_borrowers ) %] [% patrons_active_tab = 1 %] [% patrons_active = "active" %] [% ELSIF ( CAN_user_catalogue ) %] -- 2.39.5