[LON-CAPA-cvs] cvs: loncom /lonnet/perl lonnet.pm

[albertel]

albertel		Tue Aug 13 10:37:52 2002 EDT

  Modified files:              
    /loncom/lonnet/perl	lonnet.pm 
  Log:
  - no unescape key values
  
  
Index: loncom/lonnet/perl/lonnet.pm
diff -u loncom/lonnet/perl/lonnet.pm:1.266 loncom/lonnet/perl/lonnet.pm:1.267
--- loncom/lonnet/perl/lonnet.pm:1.266	Fri Aug  9 15:49:30 2002
+++ loncom/lonnet/perl/lonnet.pm	Tue Aug 13 10:37:52 2002
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # TCP networking package
 #
-# $Id: lonnet.pm,v 1.266 2002/08/09 19:49:30 albertel Exp $
+# $Id: lonnet.pm,v 1.267 2002/08/13 14:37:52 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1114,7 +1114,7 @@
           }
       } else {
           $string =~ s/^(.*?)=//;
-	  $key=$1
+	  $key=&unescape($1);
       }
       $string =~ s/^=//;