loncom/interface/lonmsg.pm - diff

Return to lonmsg.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.192, 2006/12/27 18:00:00	version 1.193, 2006/12/27 20:42:12
Line 407 sub user_crit_msg_raw {	Line 407 sub user_crit_msg_raw {
if (defined($sentmessage)) {	if (defined($sentmessage)) {
$$sentmessage = $packed_message;	$$sentmessage = $packed_message;
}	}
(undef,my $packed_message_no_citation) =	if ($env{'request.course.id'} eq '') {
	(undef,my $packed_message_no_citation) =
&packagemsg($subject,$message,undef,undef,undef,$user,$domain,	&packagemsg($subject,$message,undef,undef,undef,$user,$domain,
$msgid);	$msgid);
$status .= &store_sent_mail($msgid,$packed_message_no_citation);	if ($status eq 'ok' \|\| $status eq 'con_delayed') {
	&store_sent_mail($msgid,$packed_message_no_citation);
	}
	}
} else {	} else {
$status='no_host';	$status='no_host';
}	}
Line 540 sub user_normal_msg_raw {	Line 544 sub user_normal_msg_raw {
(undef,my $packed_message_no_citation) =	(undef,my $packed_message_no_citation) =
&packagemsg($subject,$message,undef,$baseurl,$attachmenturl,	&packagemsg($subject,$message,undef,$baseurl,$attachmenturl,
$user,$domain,$currid,undef,$crsmsgid,$symb,$error);	$user,$domain,$currid,undef,$crsmsgid,$symb,$error);
$status .= &store_sent_mail($msgid,$packed_message_no_citation);	if ($status eq 'ok' \|\| $status eq 'con_delayed') {
	&store_sent_mail($msgid,$packed_message_no_citation);
	}
}	}
} else {	} else {
$status='no_host';	$status='no_host';