From 6bb1d23ce718f191a7a2a0c4be83c1d0dfec16de Mon Sep 17 00:00:00 2001 From: Tomas Cohen Arazi Date: Wed, 20 Apr 2022 09:17:03 -0300 Subject: [PATCH] Bug 30446: (follow-up) Remove warning This patch removes a trivial warning caused by a parameter being compared to a literal but not being defined. Doing a $ git grep GetTagsLabels shows the change is safe as the function is always called with a value of either 0 or 1. Signed-off-by: Tomas Cohen Arazi --- C4/AuthoritiesMarc.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/C4/AuthoritiesMarc.pm b/C4/AuthoritiesMarc.pm index a7915e90562..6245d89ec7d 100644 --- a/C4/AuthoritiesMarc.pm +++ b/C4/AuthoritiesMarc.pm @@ -465,7 +465,7 @@ sub GetTagsLabels { my $dbh=C4::Context->dbh; $authtypecode="" unless $authtypecode; my $sth; - my $libfield = ($forlibrarian == 1)? 'liblibrarian' : 'libopac'; + my $libfield = ($forlibrarian) ? 'liblibrarian' : 'libopac'; # check that authority exists -- 2.34.1