--- rat/lonratedt.pm 2002/10/25 13:40:52 1.39 +++ rat/lonratedt.pm 2002/12/06 12:58:11 1.42 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Edit Handler for RAT Maps # -# $Id: lonratedt.pm,v 1.39 2002/10/25 13:40:52 www Exp $ +# $Id: lonratedt.pm,v 1.42 2002/12/06 12:58:11 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -329,7 +329,7 @@ sub startfinish { $resources[$#resources+1]='::false'; $order[1]=$#resources; } - my ($name,$url,$ext)=split(/\:/,$resources[$order[$#order]]); + ($name,$url,$ext)=split(/\:/,$resources[$order[$#order]]); $resources[$order[$#order]]=$name.':'.$url.':'.$ext.':finish:res'; } @@ -710,8 +710,9 @@ sub smpedt { } elsif ($ENV{'form.renameres'}) { my $residx=$Apache::lonratedt::order[$ENV{'form.renameidx'}-1]; my ($name,@resrest)=split(/\:/,$Apache::lonratedt::resources[$residx]); - $name=&Apache::lonnet::escape($ENV{'form.renametitle'}); - $Apache::lonratedt::resources[$residx]=$name.':'.join(':'.@resrest); + $name=$ENV{'form.renametitle'}; + $name=~s/\:/\&colon\;/g; + $Apache::lonratedt::resources[$residx]=$name.':'.join(':',@resrest); &storemap(&Apache::lonnet::filelocation('',$url)); } # ------------------------------------------------------------ Assemble windows @@ -779,7 +780,14 @@ sub smpedt { var selidx=document.forms.simpleedit.target.selectedIndex; var entry=(document.forms.simpleedit.targetdetail.value.split('&')) [selidx]; - var newtitle=prompt('New Title',unescape((entry.split('='))[0])); + var oldname=unescape((entry.split('='))[0]); + var nameparts=oldname.split(':'); + oldname=unescape(nameparts.join(':')); + nameparts=oldname.split('"'); + oldname=unescape(nameparts.join('"')); + nameparts=oldname.split('''); + oldname=unescape(nameparts.join("'")); + newtitle=prompt('New Title',oldname); if (newtitle) { document.forms.simpleedit.renameres.value=1; document.forms.simpleedit.renameidx.value=selidx;