diff options
Diffstat (limited to 'support/html2latex/HTML/t/foreigns.t')
-rwxr-xr-x | support/html2latex/HTML/t/foreigns.t | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/support/html2latex/HTML/t/foreigns.t b/support/html2latex/HTML/t/foreigns.t new file mode 100755 index 0000000000..3be49e97e9 --- /dev/null +++ b/support/html2latex/HTML/t/foreigns.t @@ -0,0 +1,20 @@ +#!/usr/bin/perl -w +use Latex; +use strict; + +my @files = qw(t/foreigns); +my $parser = new HTML::Latex; + +print '1..',scalar @files,"\n"; + +foreach my $file (@files){ + $parser->set_log("/dev/null"); + + my ($htmlfile,$latexfile) = $parser->html2latex("$file.html") or die "Couldn't process $file.html"; + + print "not " if (!(-f $latexfile) || `diff $latexfile $file.correct`); + print "ok\n"; +} + +unlink <*.tex>; + |