--- loncom/metadata_database/searchcat.pl	2003/08/21 01:48:22	1.39
+++ loncom/metadata_database/searchcat.pl	2003/09/26 00:23:09	1.40
@@ -2,7 +2,7 @@
 # The LearningOnline Network
 # searchcat.pl "Search Catalog" batch script
 #
-# $Id: searchcat.pl,v 1.39 2003/08/21 01:48:22 www Exp $
+# $Id: searchcat.pl,v 1.40 2003/09/26 00:23:09 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -307,6 +307,8 @@ foreach my $user (@homeusers) {
     foreach my $m (@metalist) {
         print LOG "- ".$m."\n";
         my $ref=&metadata($m);
+ 	if ($ref->{'obsolete'}) { print LOG "obsolete\n"; next; }
+	if ($ref->{'copyright'} eq 'private') { print LOG "private\n"; next; }
         my $m2='/res/'.&declutter($m);
         $m2=~s/\.meta$//;
 #        &dynamicmeta($m2);