diff options
author | Didier Raboud <odyx@debian.org> | 2018-12-01 01:39:17 +0100 |
---|---|---|
committer | Didier Raboud <odyx@debian.org> | 2019-09-15 13:18:55 +0200 |
commit | 8413fd037e4f5aed0edc384be8ec9d97f4a0646a (patch) | |
tree | e4546b6db4726bb39991825e9541af5d1e6ed2c2 | |
parent | e0e35c42bfa223825938c6eb8ed3567b1e6eaa5a (diff) |
Mirror doc/developer/cleanwarnings.pl from upstream
Taken from upstream's master; it is needed to rebuild the doc PDFs from source
-rw-r--r-- | doc/developer/cleanwarnings.pl | 41 |
1 files changed, 41 insertions, 0 deletions
diff --git a/doc/developer/cleanwarnings.pl b/doc/developer/cleanwarnings.pl new file mode 100644 index 0000000..42df778 --- /dev/null +++ b/doc/developer/cleanwarnings.pl @@ -0,0 +1,41 @@ +# -*- Mode: Perl -*- +## Copyright (C) 2013 Robert Krawitz +## +## This program is free software; you can redistribute it and/or modify +## it under the terms of the GNU General Public License as published by +## the Free Software Foundation; either version 2, or (at your option) +## any later version. +## +## This program is distributed in the hope that it will be useful, +## but WITHOUT ANY WARRANTY; without even the implied warranty of +## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +## GNU General Public License for more details. +## +## You should have received a copy of the GNU General Public License +## along with this program. If not, see <https://www.gnu.org/licenses/>. + +# Remove annoying TeX warnings from db2pdf. + +$nc=""; +while (<>) { + next if /^$/; + chomp; + LINE: + if (/^Overfull \\hbox|^LaTeX Font Warning:|^LaTeX Warning: Reference.*undefined on input line|^Package hyperref Warning:/) { + $nc=" "; + $_=<>; + $_=<>; + while (<>) { + if (! /^ *$/) { + chomp; + goto LINE; + } + } + } else { + print "${nc}$_"; + $nc="\n"; + } +} +if ($nc ne "") { + print "\n"; +} |