texfot (1may21)

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

3 files changed, 25 insertions, 20 deletions

diff --git a/Master/texmf-dist/doc/man/man1/texfot.1 b/Master/texmf-dist/doc/man/man1/texfot.1
index 8d59a59bbdd..491001177e8 100644
--- a/Master/texmf-dist/doc/man/man1/texfot.1
+++ b/Master/texmf-dist/doc/man/man1/texfot.1
@@ -1,4 +1,4 @@
-.\" Automatically generated by Pod::Man 4.11 (Pod::Simple 3.35)
+.\" Automatically generated by Pod::Man 4.14 (Pod::Simple 3.40)
 .\"
 .\" Standard preamble:
 .\" ========================================================================
@@ -133,7 +133,7 @@
 .\" ========================================================================
 .\"
 .IX Title "TEXFOT 1"
-.TH TEXFOT 1 "2020-03-10" "texfot" "Karl Berry"
+.TH TEXFOT 1 "2021-05-01" "texfot" "Karl Berry"
 .\" For nroff, turn off justification.  Always turn off hyphenation; it makes
 .\" way too many mistakes in technical documents.
 .if n .ad l
@@ -285,10 +285,11 @@ the TeX command (on stdout).  \f(CW\*(C`\-\-no\-stderr\*(C'\fR omits that report
 .el .IP "\f(CW\-\-tee\fR \fIfile\fR" 4
 .IX Item "--tee file"
 By default, the output being filtered is \f(CW\*(C`tee\*(C'\fR\-ed, before filtering, to
-\&\f(CW\*(C`$TMPDIR/fot\*(C'\fR (\f(CW\*(C`/tmp/fot\*(C'\fR if \f(CW\*(C`TMPDIR\*(C'\fR is not set), to make it easy to
-check the full output when the filtering seems suspect.  This option
-allows specifying a different file.  Use \f(CW\*(C`\-\-tee\ /dev/null\*(C'\fR if you don't
-want the original output at all.
+\&\f(CW\*(C`$TMPDIR/fot\*(C'\fR (or \f(CW\*(C`$TMP/fot\*(C'\fR if \f(CW\*(C`TMP\*(C'\fR is set, or \f(CW\*(C`/tmp/fot\*(C'\fR if
+neither environment variable is set), to make it easy to check the full
+output when the filtering seems suspect. This option allows specifying a
+different file. Use \f(CW\*(C`\-\-tee\ /dev/null\*(C'\fR if you don't want the original
+output at all.
 .ie n .IP """\-\-version""" 4
 .el .IP "\f(CW\-\-version\fR" 4
 .IX Item "--version"
@@ -300,7 +301,7 @@ Display this help and exit successfully.
 .SH "RATIONALE"
 .IX Header "RATIONALE"
 I wrote this because, in my work as a TUGboat editor
-(<http://tug.org/TUGboat>, journal submissions always welcome!), I run
+(<https://tug.org/TUGboat>, journal submissions always welcome!), I run
 and rerun many documents, many times each. It was too easy to lose
 warnings I needed to see in the mass of unvarying and uninteresting
 output from TeX, such as style files being read and fonts being used. I
@@ -319,8 +320,9 @@ Here are some keywords if you want to explore other options:
 texloganalyser, pydflatex, logfilter, latexmk, rubber, arara, and
 searching for \f(CW\*(C`log\*(C'\fR at <https://ctan.org/search>.
 .PP
-\&\f(CW\*(C`texfot\*(C'\fR is written in Perl, and runs on Unix, and does not work on
-Windows.
+\&\f(CW\*(C`texfot\*(C'\fR is written in Perl, and runs on Unix. It may work on Windows
+if Perl and other software is installed, but I don't use Windows and
+don't support C,texfot> there.
 .PP
 The name comes from the \f(CW\*(C`trip.fot\*(C'\fR and \f(CW\*(C`trap.fot\*(C'\fR files that are part
 of Knuth's trip and trap torture tests, which record the online output
diff --git a/Master/texmf-dist/doc/man/man1/texfot.man1.pdf b/Master/texmf-dist/doc/man/man1/texfot.man1.pdf
index bff64e32851..53e89ac2637 100644
--- a/Master/texmf-dist/doc/man/man1/texfot.man1.pdf
+++ b/Master/texmf-dist/doc/man/man1/texfot.man1.pdf
diff --git a/Master/texmf-dist/scripts/texfot/texfot.pl b/Master/texmf-dist/scripts/texfot/texfot.pl
index e49d5f1efc9..d0e9ad68047 100755
--- a/Master/texmf-dist/scripts/texfot/texfot.pl
+++ b/Master/texmf-dist/scripts/texfot/texfot.pl
@@ -1,5 +1,5 @@
 #!/usr/bin/env perl
-# $Id: texfot,v 1.40 2020/03/10 22:35:15 karl Exp $
+# $Id: texfot,v 1.43 2021/05/01 15:49:53 karl Exp $
 # Invoke a TeX command, filtering all but interesting terminal output;
 # do not look at the log or check any output files.
 # Exit status is that of the subprogram.
@@ -8,7 +8,7 @@
 # 
 # Public domain.  Originally written 2014 by Karl Berry.
 
-my $ident = '$Id: texfot,v 1.40 2020/03/10 22:35:15 karl Exp $';
+my $ident = '$Id: texfot,v 1.43 2021/05/01 15:49:53 karl Exp $';
 (my $prg = $0) =~ s,^.*/,,;
 select STDERR; $| = 1;  # no buffering
 select STDOUT; $| = 1;
@@ -26,7 +26,7 @@ my @opt_ignore = ();
 my $opt_interactive = 0;
 my $opt_quiet = 0;
 my $opt_stderr = 1;
-my $opt_tee = ($ENV{"TMPDIR"} || "/tmp") . "/fot";
+my $opt_tee = ($ENV{"TMPDIR"} || $ENV{"TMP"} || "/tmp") . "/fot";
 my $opt_version = 0;
 my $opt_help = 0;
 
@@ -134,10 +134,11 @@ sub process_output {
       LaTeX\ Warning:\ You\ have\ requested\ package
      |LaTeX\ Font\ Warning:\ Some\ font\ shapes
      |LaTeX\ Font\ Warning:\ Size\ substitutions
+     |Package\ auxhook\ Warning:\ Cannot\ patch
      |Package\ caption\ Warning:\ Un(supported|known)\ document\ class
      |Package\ fixltx2e\ Warning:\ fixltx2e\ is\ not\ required
-     |Package\ layouts\ Warning:\ Layout\ scale
      |Package\ frenchb?\.ldf\ Warning:\ (Figures|The\ definition)
+     |Package\ layouts\ Warning:\ Layout\ scale
      |\*\*\*\ Reloading\ Xunicode\ for\ encoding  # spurious ***
      |This\ is\ `?(epsf\.tex|.*\.sty|TAP) # so what
      |pdfTeX\ warning:.*inclusion:\ fou   #nd PDF version ...
@@ -366,10 +367,11 @@ the TeX command (on stdout).  C<--no-stderr> omits that reporting.
 =item C<--tee> I<file>
 
 By default, the output being filtered is C<tee>-ed, before filtering, to
-C<$TMPDIR/fot> (C</tmp/fot> if C<TMPDIR> is not set), to make it easy to
-check the full output when the filtering seems suspect.  This option
-allows specifying a different file.  Use S<C<--tee /dev/null>> if you don't
-want the original output at all.
+C<$TMPDIR/fot> (or C<$TMP/fot> if C<TMP> is set, or C</tmp/fot> if
+neither environment variable is set), to make it easy to check the full
+output when the filtering seems suspect. This option allows specifying a
+different file. Use S<C<--tee /dev/null>> if you don't want the original
+output at all.
 
 =item C<--version>
 
@@ -384,7 +386,7 @@ Display this help and exit successfully.
 =head1 RATIONALE
 
 I wrote this because, in my work as a TUGboat editor
-(L<http://tug.org/TUGboat>, journal submissions always welcome!), I run
+(L<https://tug.org/TUGboat>, journal submissions always welcome!), I run
 and rerun many documents, many times each. It was too easy to lose
 warnings I needed to see in the mass of unvarying and uninteresting
 output from TeX, such as style files being read and fonts being used. I
@@ -403,8 +405,9 @@ Here are some keywords if you want to explore other options:
 texloganalyser, pydflatex, logfilter, latexmk, rubber, arara, and
 searching for C<log> at L<https://ctan.org/search>.
 
-C<texfot> is written in Perl, and runs on Unix, and does not work on
-Windows.
+C<texfot> is written in Perl, and runs on Unix. It may work on Windows
+if Perl and other software is installed, but I don't use Windows and
+don't support C,texfot> there.
 
 The name comes from the C<trip.fot> and C<trap.fot> files that are part
 of Knuth's trip and trap torture tests, which record the online output