From 77f69582cad5f45557ab5710eb4b8907291f1b82 Mon Sep 17 00:00:00 2001 From: Marcel de Rooy Date: Mon, 2 Mar 2026 11:00:12 +0100 Subject: [PATCH] Bug 41962: Add comment to SearchAuthorities, change POD Content-Type: text/plain; charset=utf-8 Test plan: Read the patch. Search for both parameters to verify that they are not used. Signed-off-by: Marcel de Rooy --- C4/AuthoritiesMarc.pm | 17 ++++++++++++----- 1 file changed, 12 insertions(+), 5 deletions(-) diff --git a/C4/AuthoritiesMarc.pm b/C4/AuthoritiesMarc.pm index c2070f4560..ddb20073e0 100644 --- a/C4/AuthoritiesMarc.pm +++ b/C4/AuthoritiesMarc.pm @@ -107,18 +107,25 @@ sub GetAuthMARCFromKohaField { =head2 SearchAuthorities - (\@finalresult, $nbresults)= &SearchAuthorities($tags, $and_or, - $excluding, $operator, $value, $offset,$length,$authtypecode, - $sortby[, $skipmetadata]) + ( \@finalresult, $nbresults ) = SearchAuthorities( + $tags, $and_or, + $excluding, $operator, $value, $offset, $length, $authtypecode, + $sortby, $skipmetadata + ); + +Note: The parameters and_or and excluding are not supported currently. +The subexpressions in $tags are hardcoded with OR unless you pass the +parameter authtypecode. In the latter case AND is used. -returns ref to array result and count of results returned +Returns a results arrayref and a count of results =cut sub SearchAuthorities { + + # NOTE: The parameters $and_or, $excluding below are UNUSED here. my ( $tags, $and_or, $excluding, $operator, $value, $offset, $length, $authtypecode, $sortby, $skipmetadata ) = @_; - # warn Dumper($tags, $and_or, $excluding, $operator, $value, $offset,$length,$authtypecode,$sortby); my $dbh = C4::Context->dbh; $sortby = "" unless $sortby; my $query; -- 2.39.5