loncom/metadata_database/parse_activity_log.pl - diff

Return to parse_activity_log.pl CVS log

Up to [LON-CAPA] / loncom / metadata_database

version 1.21, 2005/11/15 20:52:02	version 1.23, 2006/03/30 06:57:50
Line 186 if (! defined($xmlfile)) {	Line 186 if (! defined($xmlfile)) {
if (!flock(LOCKFILE,LOCK_EX\|LOCK_NB)) {	if (!flock(LOCKFILE,LOCK_EX\|LOCK_NB)) {
warn("Unable to lock $lockfilename. Aborting".$/);	warn("Unable to lock $lockfilename. Aborting".$/);
# don't call clean_up_and_exit another instance is running and	# don't call clean_up_and_exit another instance is running and
# we don't want to 'cleanup' there files	# we don't want to 'cleanup' their files
exit 6;	exit 6;
}	}

Line 945 sub xml_store_id_table {	Line 945 sub xml_store_id_table {
#######################################################################	#######################################################################
{	{
my @rows;	my @rows;
my $max_row_count = 100;

sub store_entry {	sub store_entry {
	my $max_row_count = 100;
if (! @_) {	if (! @_) {
undef(@rows);	undef(@rows);
return '';	return '';