diff options
author | Norbert Preining <norbert@preining.info> | 2020-04-14 03:02:32 +0000 |
---|---|---|
committer | Norbert Preining <norbert@preining.info> | 2020-04-14 03:02:32 +0000 |
commit | c7235aafe4ddb8f9800cdf784212d4c53bb53e32 (patch) | |
tree | 3485e2d65f65d8128206c5a1c45c842b26e84705 /macros/latex/contrib/lettre/latexmkrc | |
parent | c98e9ebef816f09dc54c52a01df4f978e1b210fc (diff) |
CTAN sync 202004140302
Diffstat (limited to 'macros/latex/contrib/lettre/latexmkrc')
-rw-r--r-- | macros/latex/contrib/lettre/latexmkrc | 55 |
1 files changed, 55 insertions, 0 deletions
diff --git a/macros/latex/contrib/lettre/latexmkrc b/macros/latex/contrib/lettre/latexmkrc new file mode 100644 index 0000000000..5267b66743 --- /dev/null +++ b/macros/latex/contrib/lettre/latexmkrc @@ -0,0 +1,55 @@ +$dvi_mode = 0; +$pdf_mode = 1; +$makeindex = "makeindex %O -s letdoc.ist -o %D %S"; +$pdflatex = 'pdflatex -interaction=nonstopmode %O %S'; +$clean_ext .= ' tns fax trimmed'; +$clean_full_ext .= ' odt'; +@default_files=('letex1.tex', 'letex2.tex', 'letex3.tex', 'letex4.tex', 'letex5.tex', 'letex6.tex', 'letex7.tex', 'letex8.tex', 'testfaxf.tex', 'testfaxe.tex', 'testfaxd.tex', 'lettre.tex' ); + +sub do_tex2trimmed { + my $in; + my $inputfile = "$_[0].tex"; + open($in, "<", "$inputfile") or die "Can't open $inputfile $!"; + my $out; + my $cur_out = \*STDOUT; + my $outputfile = "$_[0].trimmed"; + open($out, ">", $outputfile) or die "Can't open $outputfile $!"; + # 0 = in header + # 1 = in body + my $state = 0; + LINE: + while(<$in>){ + $line = $_ ; + if($state eq 0) + { + if($line =~ /\A\s*\\documentclass/) + { + $state = 1; + goto OUTPUT; + } + next LINE; + } + if($state eq 1) + { + OUTPUT: + print $out "$line"; + if($line =~ /\A\s*\\end\{document\}/) + { + $state = 2; + goto CLOSEIT; + } + next LINE; + } + goto CLOSEIT; + } + CLOSEIT: + close $in; + close $out; + return 0; +} + +add_cus_dep('tex','trimmed',0,'do_tex2trimmed'); + +# Local Variables: +# mode: perl +# End: |