|
version 1.40, 2002/11/11 21:04:49
|
version 1.42, 2002/12/06 12:58:11
|
|
Line 329 sub startfinish {
|
Line 329 sub startfinish {
|
| $resources[$#resources+1]='::false'; |
$resources[$#resources+1]='::false'; |
| $order[1]=$#resources; |
$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'; |
$resources[$order[$#order]]=$name.':'.$url.':'.$ext.':finish:res'; |
| } |
} |
| |
|
|
Line 712 sub smpedt {
|
Line 712 sub smpedt {
|
| my ($name,@resrest)=split(/\:/,$Apache::lonratedt::resources[$residx]); |
my ($name,@resrest)=split(/\:/,$Apache::lonratedt::resources[$residx]); |
| $name=$ENV{'form.renametitle'}; |
$name=$ENV{'form.renametitle'}; |
| $name=~s/\:/\&colon\;/g; |
$name=~s/\:/\&colon\;/g; |
| $Apache::lonratedt::resources[$residx]=$name.':'.join(':'.@resrest); |
$Apache::lonratedt::resources[$residx]=$name.':'.join(':',@resrest); |
| &storemap(&Apache::lonnet::filelocation('',$url)); |
&storemap(&Apache::lonnet::filelocation('',$url)); |
| } |
} |
| # ------------------------------------------------------------ Assemble windows |
# ------------------------------------------------------------ Assemble windows |
|
Line 780 sub smpedt {
|
Line 780 sub smpedt {
|
| var selidx=document.forms.simpleedit.target.selectedIndex; |
var selidx=document.forms.simpleedit.target.selectedIndex; |
| var entry=(document.forms.simpleedit.targetdetail.value.split('&')) |
var entry=(document.forms.simpleedit.targetdetail.value.split('&')) |
| [selidx]; |
[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) { |
if (newtitle) { |
| document.forms.simpleedit.renameres.value=1; |
document.forms.simpleedit.renameres.value=1; |
| document.forms.simpleedit.renameidx.value=selidx; |
document.forms.simpleedit.renameidx.value=selidx; |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonratedt.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / rat