View | Details | Raw Unified | Return to bug 15005
Collapse All | Expand All

(-)a/C4/Output.pm (-1 / +1 lines)
Lines 85-91 This function returns HTML, without any language dependency. Link Here
85
=cut
85
=cut
86
86
87
sub pagination_bar {
87
sub pagination_bar {
88
	my $base_url = (@_ ? shift : $ENV{SCRIPT_NAME} . $ENV{QUERY_STRING}) or return;
88
    my $base_url = (@_ ? shift : return);
89
    my $nb_pages       = (@_) ? shift : 1;
89
    my $nb_pages       = (@_) ? shift : 1;
90
    my $current_page   = (@_) ? shift : undef;	# delay default until later
90
    my $current_page   = (@_) ? shift : undef;	# delay default until later
91
    my $startfrom_name = (@_) ? shift : 'page';
91
    my $startfrom_name = (@_) ? shift : 'page';
(-)a/acqui/neworderbiblio.pl (-2 / +1 lines)
Lines 148-154 $template->param( Link Here
148
    resultsloop          => \@results,
148
    resultsloop          => \@results,
149
    total                => $total_hits,
149
    total                => $total_hits,
150
    query                => $query,
150
    query                => $query,
151
    pagination_bar       => pagination_bar( "$ENV{'SCRIPT_NAME'}?q=$query&booksellerid=$booksellerid&basketno=$basketno&", getnbpages( $total_hits, $results_per_page ), $page, 'page' ),
151
    pagination_bar       => pagination_bar( "/cgi-bin/koha/acqui/neworderbiblio.pl?q=$query&booksellerid=$booksellerid&basketno=$basketno&", getnbpages( $total_hits, $results_per_page ), $page, 'page' ),
152
);
152
);
153
153
154
# BUILD THE TEMPLATE
154
# BUILD THE TEMPLATE
155
- 

Return to bug 15005