From 08efc656cfdf6f572890f27ff822b188dfadf178 Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Thu, 9 Jun 2016 16:39:56 +0100 Subject: [PATCH] Bug 2735: Fix authority search pagination at the OPAC MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit The authority search pagination displays only 15 pages, even when there are more. To fix that, this patch mimic the authorities-home.pl intranet script to manage the pagination. Test plan: Without this patch, do some authority search and click on different pages. Apply this patch, redo the same search and make sure the same records are displayed (i.e. confirm that the pagination still works as before). Signed-off-by: Nicole C Engard Signed-off-by: Katrin Fischer Signed-off-by: Kyle M Hall (cherry picked from commit de2df0dfe85bc8ac33375ad5b436ac247c3875d6) Signed-off-by: Frédéric Demians --- .../opac-authoritiessearchresultlist.tt | 36 ++----- koha-tmpl/opac-tmpl/bootstrap/less/opac.less | 4 +- opac/opac-authorities-home.pl | 93 +++++++------------ 3 files changed, 45 insertions(+), 88 deletions(-) diff --git a/koha-tmpl/opac-tmpl/bootstrap/en/modules/opac-authoritiessearchresultlist.tt b/koha-tmpl/opac-tmpl/bootstrap/en/modules/opac-authoritiessearchresultlist.tt index 4ebaac6521..b5f37f5bd1 100644 --- a/koha-tmpl/opac-tmpl/bootstrap/en/modules/opac-authoritiessearchresultlist.tt +++ b/koha-tmpl/opac-tmpl/bootstrap/en/modules/opac-authoritiessearchresultlist.tt @@ -1,31 +1,6 @@ [% USE Koha %] [% PROCESS 'opac-authorities.inc' %] [% PROCESS 'authorities-search-results.inc' %] -[% pagination = BLOCK %] - -[% END %] [% INCLUDE 'doc-head-open.inc' %] [% IF ( LibraryNameTitle ) %][% LibraryNameTitle %][% ELSE %]Koha online[% END %] catalog › [% IF ( total ) %]Authority search result[% ELSE %]No results found[% END %] [% INCLUDE 'doc-head-close.inc' %] @@ -56,14 +31,15 @@

Authority search results

- [% pagination %] - + [% IF total %] +
[% pagination_bar %]
+ [% END %]
[% IF ( total ) %] [% IF ( countfuzzy ) %] - Showing [% resultcount %] of about [% total %] results +

Showing [% resultcount %] of about [% total %] results

[% ELSE %] - Results [% from %] to [% to %] of [% total %] +

Results [% from %] to [% to %] of [% total %]

[% END %] [% ELSE %] No results found. @@ -102,7 +78,7 @@
- [% pagination %] +
[% pagination_bar %]
[% END # / IF total %]
diff --git a/koha-tmpl/opac-tmpl/bootstrap/less/opac.less b/koha-tmpl/opac-tmpl/bootstrap/less/opac.less index 6d20cd0bfe..c8d9f9c7dc 100644 --- a/koha-tmpl/opac-tmpl/bootstrap/less/opac.less +++ b/koha-tmpl/opac-tmpl/bootstrap/less/opac.less @@ -1957,7 +1957,9 @@ span.sep { } /* style for PM-generated pagination bar */ - +.pages { + margin: 20px 0; +} .pages span:first-child, .pages a:first-child { border-width: 1px 1px 1px 1px; diff --git a/opac/opac-authorities-home.pl b/opac/opac-authorities-home.pl index 619d137a01..5b1a42b341 100755 --- a/opac/opac-authorities-home.pl +++ b/opac/opac-authorities-home.pl @@ -22,6 +22,7 @@ use strict; use warnings; use CGI qw ( -utf8 ); +use URI::Escape; use C4::Auth; use C4::Context; @@ -40,11 +41,10 @@ my $op = $query->param('op') || ''; my $authtypecode = $query->param('authtypecode') || ''; my $dbh = C4::Context->dbh; -my $startfrom = $query->param('startfrom'); +my $startfrom = $query->param('startfrom') || 1; +my $resultsperpage = $query->param('resultsperpage') || 20; my $authid = $query->param('authid'); -$startfrom = 0 if ( !defined $startfrom ); my ( $template, $loggedinuser, $cookie ); -my $resultsperpage; my $authority_types = Koha::Authority::Types->search({}, { order_by => ['authtypetext']}); @@ -57,8 +57,6 @@ if ( $op eq "do_search" ) { my @value = $query->multi_param('value'); $value[0] ||= q||; - $resultsperpage = $query->param('resultsperpage'); - $resultsperpage = 20 if ( !defined $resultsperpage ); my @tags; my $builder = Koha::SearchEngine::QueryBuilder->new( { index => $Koha::SearchEngine::AUTHORITIES_INDEX } ); @@ -66,13 +64,8 @@ if ( $op eq "do_search" ) { { index => $Koha::SearchEngine::AUTHORITIES_INDEX } ); my $search_query = $builder->build_authorities_query_compat( \@marclist, \@and_or, \@excluding, \@operator, \@value, $authtypecode, $orderby ); -# use Data::Dumper; -# die Dumper(\@marclist, \@and_or, -# \@excluding, \@operator, \@value, $authtypecode, $orderby, $query); - # The searchengine API expects pages to start at page 1 - $startfrom = $startfrom // 0; my ( $results, $total ) = - $searcher->search_auth_compat( $search_query, $startfrom+1, $resultsperpage ); + $searcher->search_auth_compat( $search_query, $startfrom, $resultsperpage ); ( $template, $loggedinuser, $cookie ) = get_template_and_user( { template_name => "opac-authoritiessearchresultlist.tt", @@ -84,48 +77,44 @@ if ( $op eq "do_search" ) { ); # multi page display gestion - my $displaynext = 0; - my $displayprev = $startfrom; - $total ||= 0; - if ( ( $total - ( ( $startfrom + 1 ) * ($resultsperpage) ) ) > 0 ) { - $displaynext = 1; - } - - my @field_data = ( - { term => "marclist", val => $marclist[0] }, - { term => "and_or", val => $and_or[0] }, - { term => "excluding", val => $excluding[0] }, - { term => "operator", val => $operator[0] }, - { term => "value", val => $value[0] }, - ); - - my @numbers = (); - - if ( $total > $resultsperpage ) { - for ( my $i = 1 ; $i < $total / $resultsperpage + 1 ; $i++ ) { - if ( $i < 16 ) { - my $highlight = 0; - ( $startfrom == ( $i - 1 ) ) && ( $highlight = 1 ); - push @numbers, - { - number => $i, - highlight => $highlight, - searchdata => \@field_data, - startfrom => ( $i - 1 ) - }; - } - } - } - - my $from = $startfrom * $resultsperpage + 1; + my $value_url = uri_escape_utf8($value[0]); + my $base_url = "opac-authorities-home.pl?" + ."marclist=$marclist[0]" + ."&and_or=$and_or[0]" + ."&excluding=$excluding[0]" + ."&operator=$operator[0]" + ."&value=$value_url" + ."&resultsperpage=$resultsperpage" + ."&type=opac" + ."&op=do_search" + ."&authtypecode=$authtypecode" + ."&orderby=$orderby"; + + my $from = ( $startfrom - 1 ) * $resultsperpage + 1; my $to; + if ( !defined $total ) { + $total = 0; + } - if ( $total < ( ( $startfrom + 1 ) * $resultsperpage ) ) { + if ( $total < $startfrom * $resultsperpage ) { $to = $total; } else { - $to = ( ( $startfrom + 1 ) * $resultsperpage ); + $to = $startfrom * $resultsperpage; } + + $template->param( result => $results ) if $results; + + $template->param( + pagination_bar => pagination_bar( + $base_url, int( $total / $resultsperpage ) + 1, + $startfrom, 'startfrom' + ), + total => $total, + from => $from, + to => $to, + ); + unless (C4::Context->preference('OPACShowUnusedAuthorities')) { # TODO implement usage counts # my @usedauths = grep { $_->{used} > 0 } @$results; @@ -162,22 +151,12 @@ if ( $op eq "do_search" ) { } } - $template->param( result => $results ) if $results; $template->param( orderby => $orderby ); $template->param( startfrom => $startfrom, - displaynext => $displaynext, - displayprev => $displayprev, resultsperpage => $resultsperpage, - startfromnext => $startfrom + 1, - startfromprev => $startfrom - 1, - searchdata => \@field_data, countfuzzy => !(C4::Context->preference('OPACShowUnusedAuthorities')), - total => $total, - from => $from, - to => $to, resultcount => scalar @$results, - numbers => \@numbers, authtypecode => $authtypecode, authtypetext => $authority_types->find($authtypecode)->authtypetext, isEDITORS => $authtypecode eq 'EDITORS', -- 2.39.5