--- trunk/WebPac.pm 2003/03/23 01:17:49 47 +++ trunk/WebPac.pm 2003/06/01 15:33:08 51 @@ -14,7 +14,7 @@ use back2html; # configuration options -# FIX: they really should go in configuration file! +# FIXME they really should go in configuration file! my $TEMPLATE_PATH = '/data/webpac/template_html'; my $CHARSET = 'ISO-8859-2'; my $SWISH = '/usr/bin/swish-e'; @@ -137,6 +137,9 @@ $tmpl->param('hits',$hits); $tmpl->param('search',$sw_q); + $tmpl->param('PAGER_offset',$q->param("PAGER_offset") || 0); + $tmpl->param('last_PAGER_offset',$q->param("last_PAGER_offset") || 0); + # create a Pager object my $pager = HTML::Pager->new( # required parameters @@ -204,7 +207,7 @@ $tmpl->param('limit',$limit); $tmpl->param('total',$total); -# FIX: I should set offset and leave out limit from fetch!! +# FIXME I should set offset and leave out limit from fetch!! # if (! $q->param("PAGER_offset") { # $q->param("Pager_offet) # }