loncom/interface/printout.pl - diff

Return to printout.pl CVS log

Up to [LON-CAPA] / loncom / interface

version 1.121, 2007/02/22 01:00:13	version 1.122, 2007/02/23 00:39:31
Line 128 sub send_error_mail {	Line 128 sub send_error_mail {
foreach my $line (@$texfile) {	foreach my $line (@$texfile) {
$message .= "$line\n";	$message .= "$line\n";
}	}
my (undef, %receivers) = &Apache::lonfeedback::decide_receiver(undef, 0,	my (undef, %receivers) = &Apache::lonmsg::decide_receiver(undef, 0,
1,1,1);	1,1,1);
# print "<br /> sending...section: $env{'request.course.sec'}";	# print "<br /> sending...section: $env{'request.course.sec'}";
foreach my $dest (keys %receivers) {	foreach my $dest (keys %receivers) {
# print "<br /> dest is $dest";	# print "<br /> dest is $dest";