loncom/interface/printout.pl - diff

Return to printout.pl CVS log

Up to [LON-CAPA] / loncom / interface

version 1.141, 2009/04/17 10:02:49	version 1.142, 2009/06/02 12:20:14
Line 1056 sub analyze_logfile {	Line 1056 sub analyze_logfile {
# $name_file - is the name of the LaTeX file.	# $name_file - is the name of the LaTeX file.
# $identifier - is the unique LaTeX identifier.l	# $identifier - is the unique LaTeX identifier.l

print "<br />";	print '<p class="LC_error">';
if ($badtext) {	if ($badtext) {
print &mt('There are errors in [_1].',$badtext);	print &mt('There are errors in [_1].',$badtext);
} else {	} else {
print &mt('There are errors.');	print &mt('There are errors.');
}	}
print "<br />".&mt('These errors prevent this resource from printing correctly.');	print '</p>'
	.&mt('These errors prevent this resource from printing correctly.');

my $tex_handle = IO::File->new($texfile);	my $tex_handle = IO::File->new($texfile);
my @tex_contents = <$tex_handle>;	my @tex_contents = <$tex_handle>;
&send_error_mail($identifier, $badresource, $body_log_file, \@tex_contents);	&send_error_mail($identifier, $badresource, $body_log_file, \@tex_contents);