From cb0b2e74dcbe87f7cd733228974c18604c993b9f Mon Sep 17 00:00:00 2001
From: JT Smith <jt@plainblack.com>
Date: Fri, 13 Sep 2002 02:28:43 +0000
Subject: [PATCH] Fixed a bug where under certain versions of Perl, on SQL
 Reports that used the ^FormParam(); macro, the pagination function would
 sometimes fail.

---
 lib/WebGUI/Wobject/SQLReport.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lib/WebGUI/Wobject/SQLReport.pm b/lib/WebGUI/Wobject/SQLReport.pm
index da8d42e91..3010b28c1 100644
--- a/lib/WebGUI/Wobject/SQLReport.pm
+++ b/lib/WebGUI/Wobject/SQLReport.pm
@@ -183,7 +183,8 @@ sub www_view {
 					$url = WebGUI::URL::page();
 					foreach (keys %{$session{form}}) {
 						unless ($_ eq "pn") {
-							$url = WebGUI::URL::append($url, WebGUI::URL::escape($_.'='.$session{form}{$_}));
+							$url = WebGUI::URL::append($url, WebGUI::URL::escape($_)
+								.'='.WebGUI::URL::escape($session{form}{$_}));
 						}
 					}
                				$p = WebGUI::Paginator->new($url,\@row,$_[0]->get("paginateAfter"));