loncom/xml/lonxml.pm - diff

Return to lonxml.pm CVS log

Up to [LON-CAPA] / loncom / xml

version 1.430, 2006/12/11 00:42:47	version 1.430.2.1, 2006/12/28 03:00:24
Line 1573 sub error {	Line 1573 sub error {
$cdom,$cnum);	$cdom,$cnum);
my $now=time;	my $now=time;
if ($now-$lastnotified{$key}>86400) {	if ($now-$lastnotified{$key}>86400) {
	my $title = &Apache::lonnet::gettitle($symb);
	my $sentmessage;
&Apache::lonmsg::user_normal_msg($user,$domain,	&Apache::lonmsg::user_normal_msg($user,$domain,
"Error [$declutter]",$msg);	"Error [$title]",$msg,'','','','',
	\$sentmessage,$symb,$title,1);
&Apache::lonnet::put('nohist_xmlerrornotifications',	&Apache::lonnet::put('nohist_xmlerrornotifications',
{$key => $now},	{$key => $now},
$cdom,$cnum);	$cdom,$cnum);