fixed alan ritari's patch

docs/changelog/6.x.x.txt

@@ -44,8 +44,6 @@
  - BugFix: [ 999799 ] Fixed Package deletion/copy bug in 6.1.1
  - BugFix: [ 997885 ] Root move left bug. 
  - Changed 'lft' and 'rgt' database field names to 'nestedSetLeft' and 'nestedSetRight'. (Martin Kamerbeek)
- - wobject can force 302 redirect after all page processing by setting
-   $session{page}{redirectURL}
 
 6.1.1
  - bugfix [ 991313 ] Manage Translations doesn't work

lib/WebGUI.pm

@@ -176,14 +176,7 @@ sub page {
 		}
 		$cache->set($output, $ttl) if ($useCache);
 	}
-        my $httpHeader;
-
-        # allow a wobject to force a redirect by setting {page}{redirectURL}
-        if ($session{'page'}{'redirectURL'}) {
-                $httpHeader = WebGUI::Session::httpRedirect(WebGUI::Macro::process($session{'page'}{'redirectURL'}));
-        } else {
-               $httpHeader = WebGUI::HTTP::getHeader();
-        }
+        my $httpHeader = WebGUI::HTTP::getHeader();
 
 	# This allows an operation or wobject to write directly to the browser.
         if ($session{page}{empty}) {

lib/WebGUI/Wobject/WSClient.pm

@@ -491,7 +491,7 @@ sub www_view {
    # to do it this way, but it certainly is the least obtrusive to default
    # webgui flow.  This feature currently requires a patched WebGUI.pm file.
    if ($session{'form'}{'redirectURL'}) {
-      $session{'page'}{'redirectURL'} = $session{'form'}{'redirectURL'};
+	WebGUI::HTTP::setRedirect($session{'form'}{'redirectURL'});
    }
 
    $var{'results'} = \@result;