From 30530502976546bf50971a0478d1ff761618ce5c Mon Sep 17 00:00:00 2001
From: Doug Bell <doug@plainblack.com>
Date: Fri, 30 Jul 2010 15:04:49 -0500
Subject: [PATCH] closing the dialog must come last

---
 lib/WebGUI/AssetHelper/ChangeUrl.pm | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/lib/WebGUI/AssetHelper/ChangeUrl.pm b/lib/WebGUI/AssetHelper/ChangeUrl.pm
index a706d246c..c81cc9163 100644
--- a/lib/WebGUI/AssetHelper/ChangeUrl.pm
+++ b/lib/WebGUI/AssetHelper/ChangeUrl.pm
@@ -72,7 +72,7 @@ sub www_changeUrl {
             error => $i18n->get('38', 'WebGUI'),
         }
     }
-    my $f = WebGUI::HTMLForm->new($session, action=>$asset->getUrl);
+    my $f = WebGUI::HTMLForm->new($session, method => 'POST' );
     $f->hidden( name => 'op', value => 'assetHelper' );
     $f->hidden( name => 'className', value => $class );
     $f->hidden( name => "method", value=>"changeUrlSave" );
@@ -123,7 +123,11 @@ sub www_changeUrlSave {
         }
     }
 
-    return '<script type="text/javascript">window.parent.admin.closeModalDialog();</script>';
+    my $output = sprintf '<script type="text/javascript">
+        window.parent.admin.gotoAsset("%s");
+        window.parent.admin.closeModalDialog(); // Must be last, script will stop after this
+    </script>', $asset->getUrl;
+    return $output;
 }