Bug 33484: Fix for suggestions

This ugly fix is retrieving all CGI params and consider them attributes
for suggestions. So we need to exclude other ones...

There is more to make it works properly on this table.

Signed-off-by: Pedro Amorim <pedro.amorim@ptfs-europe.com>
Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
Signed-off-by: Katrin Fischer <katrin.fischer@bsz-bw.de>
This commit is contained in:
Jonathan Druart 2024-10-17 09:50:56 +02:00 committed by Katrin Fischer
parent 2ee444c524
commit 6d6b64ae4f
Signed by: kfischer
GPG key ID: 0EF6E2C03357A834

View file

@ -112,8 +112,10 @@ $suggestion_only->{STATUS} = $suggestion_ref->{STATUS};
delete $$suggestion_ref{$_}
foreach
qw( suggestedbyme op displayby tabcode notify filter_archived koha_login_context auth_forwarded_hash password userid );
foreach (keys %$suggestion_ref){
delete $$suggestion_ref{$_} if (!$$suggestion_ref{$_} && ($op eq 'else' ));
foreach my $key ( keys %$suggestion_ref ) {
delete $suggestion_ref->{$key} if ( !$suggestion_ref->{$key} && ( $op eq 'else' ) );
delete $suggestion_ref->{$key} if $key =~ m{^DataTables_acqui_suggestions_suggestions};
}
delete $suggestion_only->{branchcode} if $suggestion_only->{branchcode} eq '__ANY__';
delete $suggestion_only->{budgetid} if $suggestion_only->{budgetid} eq '__ANY__';