From a2b2bb662ff3f1a2bb894abf40e4c8f6fe4c9e4c Mon Sep 17 00:00:00 2001
From: Martin Kamerbeek <martin@webgui-svn>
Date: Tue, 6 Jun 2006 11:53:23 +0000
Subject: [PATCH] fix: Pagination of search results does not work

---
 docs/changelog/6.x.x.txt           | 1 +
 lib/WebGUI/Asset/Wobject/Search.pm | 3 ++-
 2 files changed, 3 insertions(+), 1 deletion(-)

diff --git a/docs/changelog/6.x.x.txt b/docs/changelog/6.x.x.txt
index 948d1771c..1345135a8 100644
--- a/docs/changelog/6.x.x.txt
+++ b/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
diff --git a/lib/WebGUI/Asset/Wobject/Search.pm b/lib/WebGUI/Asset/Wobject/Search.pm
index fb35a3a8c..c32d08d35 100644
--- a/lib/WebGUI/Asset/Wobject/Search.pm
+++ b/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;