texlogfilter (18mar22)

git-svn-id: svn://tug.org/texlive/trunk@62792 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 16 insertions, 3 deletions

diff --git a/Master/texmf-dist/scripts/texlogfilter/texlogfilter b/Master/texmf-dist/scripts/texlogfilter/texlogfilter
index ee962a3e9b7..f960c9a3773 100755
--- a/Master/texmf-dist/scripts/texlogfilter/texlogfilter
+++ b/Master/texmf-dist/scripts/texlogfilter/texlogfilter
@@ -16,7 +16,7 @@ use Getopt::Long;
 use Term::ANSIColor;
 
 my $name = "texlogfilter";
-my $version = "1.0";
+my $version = "1.1";
 
 # options
 my @userfilters;
@@ -24,6 +24,7 @@ my $showhelp = 0;
 my $showversion = 0;
 my $showrefmsg = 1;
 my $showboxmsg = 1;
+my $showinfomsg = 0;
 my $showskips = 0;
 my $skipmarker = "...";
 my $extpattern = "tex|sty|cls|bib";
@@ -37,6 +38,7 @@ my $usrcolor = "reset";
 
 GetOptions ("box!"              => \$showboxmsg,    # show box warnings
             "ref!"              => \$showrefmsg,    # show reference and citation warnings
+            "info!"             => \$showinfomsg,   # show latex info messages
             "skips!"            => \$showskips,     # show that lines have been skipped
             "skip-marker=s"     => \$skipmarker,    # how to indicate skipped lines
             "files-ext=s"       => \$extpattern,    # file extension regex pattern
@@ -87,6 +89,9 @@ Options:
  --ref                  : show reference/citation warnings
  --no-ref               : mask reference/citation warnings
 
+ --info                 : show latex info messages
+ --no-info              : mask latex info messages
+
  --filename             : print current file name
  --no-filename          : do not print current file name
  --files-ext=string     : regex pattern used to match files extension (default: $extpattern)
@@ -211,6 +216,7 @@ while (<>) {
     elsif (/(overfull|underfull|badbox)/i)                              { if ($showboxmsg){handle_warning(1);} }
 
     # find infos
+    elsif (/^(LaTeX) (\w+ )?Info/i)                                     { if ($showinfomsg){handle_info();} }
     elsif (/^(LaTeX)/i)                                                 { handle_info(); }
     elsif (/^Document Class/i)                                          { handle_info(); }
     elsif (/^\\input/)                                                  { handle_info(); }
@@ -276,6 +282,9 @@ Without input file, standard input is used.  Use on latex engine output with:
     --ref                  : show reference/citation warnings
     --no-ref               : mask reference/citation warnings
 
+    --info                 : show latex info messages
+    --no-info              : mask latex info messages
+
     --filename             : print current file name
     --no-filename          : do not print current file name
     --files-ext=string     : regex pattern used to match files extension (default: tex|sty|cls|bib)
@@ -302,6 +311,8 @@ Without input file, standard input is used.  Use on latex engine output with:
 
 =item * B<texloganalyser> : L<https://www.ctan.org/pkg/texloganalyser>
 
+=item * B<texlogsieve> : L<https://ctan.org/pkg/texlogsieve>
+
 =back
 
 =head2 AUTHOR
@@ -321,13 +332,15 @@ distributions of LaTeX version 2005/12/01 or later.
 
 =head2 VERSION
 
-1.0
+1.1
 
 =head2 HISTORY
 
 =over
 
-=item * 2021, november : version 1.0 (initial version).
+=item * 2022, march, version 1.1 : add --info and --no-info options.
+
+=item * 2021, november, version 1.0 : initial version.
 
 =back