From a8217325ec82585f2c0a40713c65d428a999a742 Mon Sep 17 00:00:00 2001 From: JT Smith Date: Mon, 30 Jul 2007 01:15:19 +0000 Subject: [PATCH] fixing redirect cache problem after setup --- lib/WebGUI/Setup.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/WebGUI/Setup.pm b/lib/WebGUI/Setup.pm index 192cd8567..809ca3baf 100644 --- a/lib/WebGUI/Setup.pm +++ b/lib/WebGUI/Setup.pm @@ -111,6 +111,7 @@ The current WebGUI::Session object. sub setup { my $session = shift; + $session->http->setCacheControl("none"); my $i18n = WebGUI::International->new($session, "WebGUI"); my ($output,$legend) = ""; if ($session->form->process("step") eq "2") { @@ -484,7 +485,7 @@ a:visited { color: '.$form->get("visitedLinkColor").'; } # remove init state $session->setting->remove('specialState'); - $session->http->setRedirect($session->url->gateway()); + $session->http->setRedirect($session->url->gateway("?setup=complete")); return undef; } else { @@ -555,7 +556,6 @@ return props[propName];

'.$legend.'

'.$output.'
'; - $session->http->setCacheControl("none"); $session->http->setMimeType("text/html"); return $page; }