--- loncom/metadata_database/searchcat.pl 2007/01/01 21:23:10 1.72 +++ loncom/metadata_database/searchcat.pl 2007/01/02 09:12:51 1.74 @@ -2,7 +2,7 @@ # The LearningOnline Network # searchcat.pl "Search Catalog" batch script # -# $Id: searchcat.pl,v 1.72 2007/01/01 21:23:10 raeburn Exp $ +# $Id: searchcat.pl,v 1.74 2007/01/02 09:12:51 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -330,6 +330,7 @@ sub process_portfolio_access_data { $acc_data->{keynum} = $key; my ($num,$scope,$end,$start) = ($key =~ /^([^:]+):([a-z]+)_(\d*)_?(\d*)$/); + next if (($scope ne 'public') && ($scope ne 'guest')); $acc_data->{scope} = $scope; if ($end != 0) { $acc_data->{end} = &LONCAPA::lonmetadata::sqltime($end); @@ -612,7 +613,7 @@ sub portfolio_metadata { $metacache{'owner'} = $uname.':'.$dom; $metacache{'domain'} = $dom; $metacache{'mime'} = $mime; - if (defined($group)) { + if ($group ne '') { $metacache{'keys'} .= ',courserestricted'; $metacache{'courserestricted'} = 'course.'.$dom.'_'.$uname; }