From 9e0f43bce15191696b0d41c4fac6122cd82917ec Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Fri, 10 Sep 2021 11:33:18 +0200 Subject: [PATCH] Bug 28941: Deal with OPACSuggestionUnwantedFields Remove fields from OPACSuggestionUnwantedFields before creating the suggestion Signed-off-by: Marcel de Rooy JD amended patch: remove useless sort Signed-off-by: Wainui Witika-Park --- opac/opac-suggestions.pl | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/opac/opac-suggestions.pl b/opac/opac-suggestions.pl index e63b6a4f79..dff919cc24 100755 --- a/opac/opac-suggestions.pl +++ b/opac/opac-suggestions.pl @@ -153,6 +153,10 @@ if ( $op eq "add_confirm" ) { } } else { + for my $f ( split(/\s*\,\s*/, C4::Context->preference("OPACSuggestionUnwantedFields") ) ) { + delete $suggestion->{$f}; + } + my $scrubber = C4::Scrubber->new(); foreach my $suggest ( keys %$suggestion ) { -- 2.39.5