fix: Pagination of search results does not work

docs/changelog/6.x.x.txt

@@ -10,6 +10,7 @@
  - fix: i18n reserved section name in Surveys
  - fix: typo in Asset_ProjectManager i18n
  - fix: captcha image is blank (Martink Kamerbeek / Procolix)
+ - fix: Pagination of search results does not work (Martin Kamerbeek / Procolix)
 
 6.99.3
  - Someone removed the status from the submission templates. That has been

lib/WebGUI/Asset/Wobject/Search.pm

@@ -15,6 +15,7 @@ use base "WebGUI::Asset::Wobject";
 use Tie::IxHash;
 use WebGUI::International;
 use WebGUI::Paginator;
+use WebGUI::Search;
 
 =head1 NAME
 
@@ -147,7 +148,7 @@ sub view {
 				synposis=>$data->{synopsis},
 				});
 		} 
-		my $p = WebGUI::Paginator->new($self->session,$self->getUrl);
+		my $p = WebGUI::Paginator->new($self->session,$self->getUrl('doit=1;keywords='.$self->session->url->escape($self->session->form->get('keywords'))));
 		$p->setDataByArrayRef(\@results);	
 		$p->appendTemplateVars(\%var);
 		$var{result_set} = $p->getPageData;