--- loncom/lonnet/perl/lonnet.pm	2005/06/19 00:41:33	1.643
+++ loncom/lonnet/perl/lonnet.pm	2005/06/29 11:57:17	1.644
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # TCP networking package
 #
-# $Id: lonnet.pm,v 1.643 2005/06/19 00:41:33 www Exp $
+# $Id: lonnet.pm,v 1.644 2005/06/29 11:57:17 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -4885,7 +4885,7 @@ sub metadata_generate_part0 {
 					   '.type'};
       my $olddis=$$metacache{':parameter_'.$allnames{$name}.'_'.$name.
 			     '.display'};
-      my $expr='\\[Part: '.$allnames{$name}.'\\]';
+      my $expr='[Part: '.$allnames{$name}.']';
       $olddis=~s/\Q$expr\E/\[Part: 0\]/;
       $$metacache{"$key.display"}=$olddis;
     }
@@ -4990,7 +4990,7 @@ sub symbverify {
         if ($ids) {
 # ------------------------------------------------------------------- Has ID(s)
 	    foreach (split(/\,/,$ids)) {
-               my ($mapid,$resid)=split(/\./,$_);
+	       my ($mapid,$resid)=split(/\./,$_);
                if (
   &symbclean(&declutter($bighash{'map_id_'.$mapid}).'___'.$resid.'___'.$thisfn)
    eq $symb) {