[LON-CAPA-cvs] cvs: loncom /metadata_database searchcat.pl

raeburn lon-capa-cvs@mail.lon-capa.org
Tue, 02 Jan 2007 07:26:12 -0000


raeburn		Tue Jan  2 02:26:12 2007 EDT

  Modified files:              
    /loncom/metadata_database	searchcat.pl 
  Log:
  Only store in MySQL portfolio_access table for searching if acl is for public or passphrase protected access.
  
  
Index: loncom/metadata_database/searchcat.pl
diff -u loncom/metadata_database/searchcat.pl:1.72 loncom/metadata_database/searchcat.pl:1.73
--- loncom/metadata_database/searchcat.pl:1.72	Mon Jan  1 16:23:10 2007
+++ loncom/metadata_database/searchcat.pl	Tue Jan  2 02:26:11 2007
@@ -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.73 2007/01/02 07:26:11 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -330,6 +330,7 @@
         $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);