@@ -, +, @@ name broken by extended attributes field, and hit the "Search" button Well described for a tricky bug. Reproducible. Fixed with this patch. --- C4/Members.pm | 4 ++-- .../intranet-tmpl/prog/en/modules/patroncards/members-search.tt | 2 +- patroncards/members-search.pl | 5 +++-- 3 files changed, 6 insertions(+), 5 deletions(-) --- a/C4/Members.pm +++ a/C4/Members.pm @@ -198,7 +198,7 @@ sub _express_member_find { } sub Search { - my ( $filter, $orderby, $limit, $columns_out, $search_on_fields, $searchtype ) = @_; + my ( $filter, $orderby, $limit, $columns_out, $search_on_fields, $searchtype, $not_attributes ) = @_; my $search_string; my $found_borrower; @@ -232,7 +232,7 @@ sub Search { } } - if ( !$found_borrower && C4::Context->preference('ExtendedPatronAttributes') && $search_string ) { + if ( !$found_borrower && C4::Context->preference('ExtendedPatronAttributes') && $search_string && !$not_attributes ) { my $matching_records = C4::Members::Attributes::SearchIdMatchingAttribute($search_string); if(scalar(@$matching_records)>0) { if ( my $fr = ref $filter ) { --- a/koha-tmpl/intranet-tmpl/prog/en/modules/patroncards/members-search.tt +++ a/koha-tmpl/intranet-tmpl/prog/en/modules/patroncards/members-search.tt @@ -50,7 +50,7 @@ function add_item(borrowernum,batch_id,type_id){
Browse by last name: [% FOREACH letter IN alphabet.split(' ') %] - [% letter %] + [% letter %] [% END %]
--- a/patroncards/members-search.pl +++ a/patroncards/members-search.pl @@ -35,6 +35,7 @@ my $resultsperpage = $cgi->param('resultsperpage')||C4::Context->preference("Pat my $category = $cgi->param('category') || undef; my $member = $cgi->param('member') || ''; my $orderby = $cgi->param('orderby') || undef; +my $not_attributes = $cgi->param('not_attributes') || undef; my @categories=C4::Category->all; my %categories_display; @@ -72,8 +73,8 @@ $member =~ s/,//g; #remove any commas from search string $member =~ s/\*/%/g; if ($member || $category) { - my $results = $category ? Search({''=>$member, categorycode=>$category}, $orderby) - : Search($member, $orderby); + my $results = $category ? Search({''=>$member, categorycode=>$category}, $orderby, undef, undef, undef, undef, $not_attributes ) + : Search($member, $orderby, undef, undef, undef, undef, $not_attributes); my $count = $results ? @$results : 0; my @resultsdata = (); --