--- loncom/interface/lonmeta.pm	2000/11/27 23:10:59	1.4
+++ loncom/interface/lonmeta.pm	2001/08/10 17:16:06	1.6
@@ -35,6 +35,13 @@ sub handler {
       $content{$_}=&Apache::lonnet::metadata($uri,$_);
   } split(/\,/,&Apache::lonnet::metadata($uri,'keys'));
 
+# ------------------------------------------------------------------ Hide stuff
+  if (!$ENV{'user.adv'}) {
+    map {
+      $content{$_}='<i>- not displayed -</i>';
+    } ('keywords','notes','abstract','subject');
+  }
+
 # --------------------------------------------------------------- Render Output
 
 my $creationdate=localtime($content{'creationdate'});
@@ -75,8 +82,19 @@ ENDHEAD
   map {
       my $name=$_;
       my $display=&Apache::lonnet::metadata($uri,$name.'.display');
-      unless ($display) { $display=$name; }; 
-      $r->print('<b>'.$display.':</b> '.$content{$name}.'<br>');
+      unless ($display) { $display=$name; };
+      my $otherinfo='';
+      map {
+          if (defined(&Apache::lonnet::metadata($uri,$name.'.'.$_))) {
+             $otherinfo.=' '.$_.'='.
+		 &Apache::lonnet::metadata($uri,$name.'.'.$_).'; ';
+          }
+      } ('name','part','type','default'); 
+      $r->print('<b>'.$display.':</b> '.$content{$name});
+      if ($otherinfo) {
+         $r->print(' ('.$otherinfo.')');
+      }
+      $r->print("<br>\n");
   } sort keys %content;
   $r->print('</body></html>');
   return OK;