loncom/lonnet/perl/lonnet.pm - diff

Return to lonnet.pm CVS log

Up to [LON-CAPA] / loncom / lonnet / perl

version 1.599, 2005/02/17 22:43:27	version 1.600, 2005/02/23 23:19:42
Line 883 sub do_cache_new {	Line 883 sub do_cache_new {
$setvalue='__undef__';	$setvalue='__undef__';
}	}
if ($debug) { &Apache::lonnet::logthis("Setting $id to $value"); }	if ($debug) { &Apache::lonnet::logthis("Setting $id to $value"); }
$memcache->set($id,$setvalue,300);	$memcache->set($id,$setvalue,$time);
&make_room($id,$value,$debug);	# need to make a copy of $value
	#&make_room($id,$value,$debug);
return $value;	return $value;
}	}