From d1f8e2bf2049d2bf902c08ffefa2b0933fbaaa2d Mon Sep 17 00:00:00 2001
From: JT Smith <jt@plainblack.com>
Date: Mon, 7 Feb 2005 02:27:41 +0000
Subject: [PATCH] fixed URL changer for branch editor

---
 lib/WebGUI/Asset.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/lib/WebGUI/Asset.pm b/lib/WebGUI/Asset.pm
index 60cca1e87..35eeca3e5 100644
--- a/lib/WebGUI/Asset.pm
+++ b/lib/WebGUI/Asset.pm
@@ -2634,8 +2634,8 @@ sub www_editTreeSave {
 	my ($urlBaseBy, $urlBase, $endOfUrl);
 	my $changeUrl = WebGUI::FormProcessor::yesNo("change_url");
 	if ($changeUrl) {
-		$urlBaseBy = WebGUI::FormProcessor::selectList("urlBaseBy");
-		$urlBase = WebGUI::FormProcessor::text("urlBase");
+		$urlBaseBy = WebGUI::FormProcessor::selectList("baseUrlBy");
+		$urlBase = WebGUI::FormProcessor::text("baseUrl");
 		$endOfUrl = WebGUI::FormProcessor::selectList("endOfUrl");
 	}
 	my $descendants = $self->getLineage(["self","descendants"],{returnObjects=>1});	
@@ -2645,7 +2645,7 @@ sub www_editTreeSave {
 			if ($urlBaseBy eq "parentUrl") {
 				delete $descendant->{_parent};
 				$data{url} = $descendant->getParent->get("url")."/";
-			} elsif ($urlBaseBy eq "specifiedUrl") {
+			} elsif ($urlBaseBy eq "specifiedBase") {
 				$data{url} = $urlBase."/";
 			} else {
 				$data{url} = "";