--- trunk/vhost/webpac2.cgi 2009/04/25 17:12:43 1166 +++ trunk/vhost/webpac2.cgi 2009/04/25 21:25:15 1170 @@ -218,6 +218,8 @@ $pager->total_entries( $swish_results->hits ); + $swish_results->seek_result( $pager->first ); + if ( ! $pager->total_entries ) { my $no_results = 'No results for search %s'; $no_results = $swish->error_string . '
%s' if $swish->error; @@ -234,7 +236,11 @@ my $start = $pager->first; print qq|
    \n|; + my $limit = $pager->entries_on_this_page; + while ( my $result = $swish_results->next_result ) { + last if $limit-- == 0; + my $data = from_json $result->property('data'); dump_yaml( 'data', $data );