--- loncom/interface/lonmeta.pm	2000/11/28 02:49:10	1.5
+++ loncom/interface/lonmeta.pm	2001/08/10 17:20:19	1.7
@@ -6,7 +6,7 @@
 #
 # 05/29/00,05/30,10/11 Gerd Kortemeyer)
 #
-# 10/19,10/21,10/23,11/27 Gerd Kortemeyer
+# 10/19,10/21,10/23,11/27,08/09/01 Gerd Kortemeyer
 
 package Apache::lonmeta;
 
@@ -35,6 +35,14 @@ sub handler {
       $content{$_}=&Apache::lonnet::metadata($uri,$_);
   } split(/\,/,&Apache::lonnet::metadata($uri,'keys'));
 
+# ------------------------------------------------------------------ Hide stuff
+
+  unless ($ENV{'user.adv'}) {
+      map {
+          $content{$_}='<i>- not displayed -</i>';
+      } ('keywords','notes','abstract','subject');
+  }
+
 # --------------------------------------------------------------- Render Output
 
 my $creationdate=localtime($content{'creationdate'});
@@ -72,7 +80,8 @@ ENDHEAD
   delete($content{'lastrevisiondate'});
   delete($content{'owner'});
   delete($content{'copyright'});
-  map {
+  if ($ENV{'user.adv'}) {
+   map {
       my $name=$_;
       my $display=&Apache::lonnet::metadata($uri,$name.'.display');
       unless ($display) { $display=$name; };
@@ -88,7 +97,8 @@ ENDHEAD
          $r->print(' ('.$otherinfo.')');
       }
       $r->print("<br>\n");
-  } sort keys %content;
+   } sort keys %content;
+  }
   $r->print('</body></html>');
   return OK;
 }