diff options
Diffstat (limited to 'Build/source/texk/chktex/chktex-src/MakeHTML.pl')
-rw-r--r-- | Build/source/texk/chktex/chktex-src/MakeHTML.pl | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/Build/source/texk/chktex/chktex-src/MakeHTML.pl b/Build/source/texk/chktex/chktex-src/MakeHTML.pl new file mode 100644 index 00000000000..6bdbadcf127 --- /dev/null +++ b/Build/source/texk/chktex/chktex-src/MakeHTML.pl @@ -0,0 +1,20 @@ +# Remove parts of code enclosed in %latex/%endlatex tags + +$latexonly = 0; + +while(<>) +{ + $latexonly = 1 if /^%latex/i; + $latexonly = 0 if /^%endlatex/i; + + + if($latexonly) { + if(/^%!(.*)/) + { + print $1; + } + } + else { + print; + } +} |