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); |