[LON-CAPA-cvs] cvs: loncom(version_2_3_X) /xml lonxml.pm

[albertel]

albertel		Wed Dec 27 22:00:24 2006 EDT

  Modified files:              (Branch: version_2_3_X)
    /loncom/xml	lonxml.pm 
  Log:
  - backport 1.434
  
  
Index: loncom/xml/lonxml.pm
diff -u loncom/xml/lonxml.pm:1.430 loncom/xml/lonxml.pm:1.430.2.1
--- loncom/xml/lonxml.pm:1.430	Sun Dec 10 19:42:47 2006
+++ loncom/xml/lonxml.pm	Wed Dec 27 22:00:24 2006
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # XML Parser Module 
 #
-# $Id: lonxml.pm,v 1.430 2006/12/11 00:42:47 albertel Exp $
+# $Id: lonxml.pm,v 1.430.2.1 2006/12/28 03:00:24 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1573,8 +1573,11 @@
 						      $cdom,$cnum);
 		my $now=time;
 		if ($now-$lastnotified{$key}>86400) {
+                    my $title = &Apache::lonnet::gettitle($symb);
+                    my $sentmessage;
 		    &Apache::lonmsg::user_normal_msg($user,$domain,
-						 "Error [$declutter]",$msg);
+		        "Error [$title]",$msg,'','','','',
+                        \$sentmessage,$symb,$title,1);
 		    &Apache::lonnet::put('nohist_xmlerrornotifications',
 					 {$key => $now},
 					 $cdom,$cnum);