From 84922d4ad975956b14d48102802112d0a8a35403 Mon Sep 17 00:00:00 2001 From: Kyle M Hall Date: Fri, 2 Feb 2024 09:36:31 -0500 Subject: [PATCH] Bug 34478: Changes for members/member-flags Signed-off-by: Jonathan Druart --- .../intranet-tmpl/prog/en/modules/members/member-flags.tt | 2 +- members/member-flags.pl | 4 +++- 2 files changed, 4 insertions(+), 2 deletions(-) diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/members/member-flags.tt b/koha-tmpl/intranet-tmpl/prog/en/modules/members/member-flags.tt index 2ca70f299a..f2fe057b80 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/modules/members/member-flags.tt +++ b/koha-tmpl/intranet-tmpl/prog/en/modules/members/member-flags.tt @@ -43,7 +43,7 @@
[% INCLUDE 'csrf-token.inc' %] - +

Set permissions for [% INCLUDE 'patron-title.inc' no_html = 1 %]

diff --git a/members/member-flags.pl b/members/member-flags.pl index c1f737db32..f208f6751a 100755 --- a/members/member-flags.pl +++ b/members/member-flags.pl @@ -44,7 +44,9 @@ output_and_exit_if_error( $input, $cookie, $template, { module => 'members', log my %member2; $member2{'borrowernumber'}=$member; -if ($input->param('newflags')) { +my $op = $input->param('op') // q{}; + +if ($op eq 'cud-newflags') { my $dbh=C4::Context->dbh(); -- 2.39.5