oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fixed URL changer for branch editor

Browse source
This commit is contained in:
JT Smith 2005-02-07 02:27:41 +00:00
parent 55c709a051
commit d1f8e2bf20
1 changed files with 3 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lib/WebGUI/Asset.pm
View file

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