--- loncom/lonnet/perl/lonnet.pm	2001/08/07 09:47:53	1.140
+++ loncom/lonnet/perl/lonnet.pm	2001/08/07 14:54:51	1.142
@@ -1823,6 +1823,12 @@ sub EXT {
       $metadata=&metadata($ENV{'request.filename'},
                                          'parameter_'.$spacequalifierrest);
       if ($metadata) { return $metadata; }
+      
+      $spacequalifierrest=~/[^\_]+$/;
+      
+      $metadata=&metadata($ENV{'request.filename'},'parameter_0'.$1);
+
+      if ($metadata) { return $metadata; }
 
 # ---------------------------------------------------- Any other user namespace
     } elsif ($realm eq 'environment') {
@@ -1879,7 +1885,10 @@ sub metadata {
                       }
                       my $unikey='parameter'.$keyroot.'_'.$name;
                       $metathesekeys{$unikey}=1;
-                      $metacache{$uri.':'.$unikey.'.'.$subp}=$value;
+                      unless 
+                       (defined($metacache{$uri.':'.$unikey.'.'.$subp})) {
+                         $metacache{$uri.':'.$unikey.'.'.$subp}=$value;
+		      }
                   }
               } keys %packagetab;
              } else {