From 3ad8cae190b21fbd5a627d5c2be12894901073a0 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 (cherry picked from commit 08efc656cfdf6f572890f27ff822b188dfadf178) Signed-off-by: Julian Maurice --- .../opac-authoritiessearchresultlist.tt | 36 ++------ koha-tmpl/opac-tmpl/bootstrap/less/opac.less | 4 +- opac/opac-authorities-home.pl | 89 ++++++++----------- 3 files changed, 45 insertions(+), 84 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 1440016d46..d2a2998d3e 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 fc4e71b508..f51f583942 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; @@ -36,11 +37,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 $authtypes = getauthtypes(); my @authtypesloop = (); @@ -67,12 +67,10 @@ 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 ( $results, $total, @fields ) = SearchAuthorities( \@marclist, \@and_or, \@excluding, \@operator, - \@value, $startfrom * $resultsperpage, + \@value, ($startfrom - 1) * $resultsperpage, $resultsperpage, $authtypecode, $orderby ); ( $template, $loggedinuser, $cookie ) = get_template_and_user( { @@ -85,48 +83,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 - 1) / $resultsperpage ) + 1, + $startfrom, 'startfrom' + ), + total => $total, + from => $from, + to => $to, + ); + unless (C4::Context->preference('OPACShowUnusedAuthorities')) { my @usedauths = grep { $_->{used} > 0 } @$results; $results = \@usedauths; @@ -162,23 +156,12 @@ if ( $op eq "do_search" ) { } } - $template->param( result => $results ) if $results; - $template->param( FIELDS => \@fields ); $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 => $authtypes->{$authtypecode}{'authtypetext'}, isEDITORS => $authtypecode eq 'EDITORS', -- 2.39.5