[BACK]Return to lonratedt.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / rat

Diff for /rat/lonratedt.pm between versions 1.39 and 1.42

version 1.39, 2002/10/25 13:40:52 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 710  sub smpedt { Line 710  sub smpedt {
    } elsif ($ENV{'form.renameres'}) {     } elsif ($ENV{'form.renameres'}) {
        my $residx=$Apache::lonratedt::order[$ENV{'form.renameidx'}-1];         my $residx=$Apache::lonratedt::order[$ENV{'form.renameidx'}-1];
        my ($name,@resrest)=split(/\:/,$Apache::lonratedt::resources[$residx]);         my ($name,@resrest)=split(/\:/,$Apache::lonratedt::resources[$residx]);
        $name=&Apache::lonnet::escape($ENV{'form.renametitle'});         $name=$ENV{'form.renametitle'};
        $Apache::lonratedt::resources[$residx]=$name.':'.join(':'.@resrest);         $name=~s/\:/\&colon\;/g;
          $Apache::lonratedt::resources[$residx]=$name.':'.join(':',@resrest);
        &storemap(&Apache::lonnet::filelocation('',$url));         &storemap(&Apache::lonnet::filelocation('',$url));
    }     }
 # ------------------------------------------------------------ Assemble windows  # ------------------------------------------------------------ Assemble windows
Line 779  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;
Removed from v.1.39  
changed lines
  Added in v.1.42

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>