blob: 2327594a8b65cfd93f4ac111161820b3e905362b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
|
%
%
% my %opt = @_;
%
% my $pager = '';
% if ( $opt{'total'} != $opt{'num_rows'} && $opt{'maxrecords'} ) {
% unless ( $opt{'offset'} == 0 ) {
% $cgi->param('offset', $opt{'offset'} - $opt{'maxrecords'});
%
<A HREF="<% $cgi->self_url %>"><B><FONT SIZE="+1">Previous</FONT></B></A>
%
% }
% my $page = 0;
% for ( my $poff = 0; $poff < $opt{'total'}; $poff += $opt{'maxrecords'} ) {
% $page++;
% if ( $opt{'offset'} == $poff ) {
%
<FONT SIZE="+2"><% $page %></FONT>
%
% } else {
% $cgi->param('offset', $poff);
%
<A HREF="<% $cgi->self_url %>"><% $page %></A>
%
% }
% }
% unless ( $opt{'offset'} + $opt{'maxrecords'} > $opt{'total'} ) {
% $cgi->param('offset', $opt{'offset'} + $opt{'maxrecords'});
%
<A HREF="<% $cgi->self_url %>"><B><FONT SIZE="+1">Next</FONT></B></A>
%
% }
% }
%
|
