loncom/metadata_database/searchcat.pl - diff

Return to searchcat.pl CVS log

Up to [LON-CAPA] / loncom / metadata_database

version 1.72, 2007/01/01 21:23:10	version 1.73, 2007/01/02 07:26:11
Line 330 sub process_portfolio_access_data {	Line 330 sub process_portfolio_access_data {
$acc_data->{keynum} = $key;	$acc_data->{keynum} = $key;
my ($num,$scope,$end,$start) =	my ($num,$scope,$end,$start) =
($key =~ /^([^:]+):([a-z]+)_(\d)_?(\d)$/);	($key =~ /^([^:]+):([a-z]+)_(\d)_?(\d)$/);
	next if (($scope ne 'public') && ($scope ne 'guest'));
$acc_data->{scope} = $scope;	$acc_data->{scope} = $scope;
if ($end != 0) {	if ($end != 0) {
$acc_data->{end} = &LONCAPA::lonmetadata::sqltime($end);	$acc_data->{end} = &LONCAPA::lonmetadata::sqltime($end);