[LON-CAPA-cvs] cvs: rat / lonratedt.pm

[www]

www		Mon Nov 11 16:04:49 2002 EDT

  Modified files:              
    /rat	lonratedt.pm 
  Log:
  Escaped junk characters after doing a "rename" fixed.
  
  
Index: rat/lonratedt.pm
diff -u rat/lonratedt.pm:1.39 rat/lonratedt.pm:1.40
--- rat/lonratedt.pm:1.39	Fri Oct 25 09:40:52 2002
+++ rat/lonratedt.pm	Mon Nov 11 16:04:49 2002
@@ -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.40 2002/11/11 21:04:49 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -710,7 +710,8 @@
    } 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'});
+       $name=$ENV{'form.renametitle'};
+       $name=~s/\:/\&colon\;/g;
        $Apache::lonratedt::resources[$residx]=$name.':'.join(':'.@resrest);
        &storemap(&Apache::lonnet::filelocation('',$url));
    }