texlive[57837] Master/tlpkg/bin/tl-check-fmttriggers:
commits+karl at tug.org
commits+karl at tug.org
Mon Feb 22 00:18:27 CET 2021
Revision: 57837
http://tug.org/svn/texlive?view=revision&revision=57837
Author: karl
Date: 2021-02-22 00:18:27 +0100 (Mon, 22 Feb 2021)
Log Message:
-----------
(compare_pkgs_and_triggers): exclude atbegshi
etc. from tlpdb-only report, but keep them for
recorded check.
Modified Paths:
--------------
trunk/Master/tlpkg/bin/tl-check-fmttriggers
Modified: trunk/Master/tlpkg/bin/tl-check-fmttriggers
===================================================================
--- trunk/Master/tlpkg/bin/tl-check-fmttriggers 2021-02-21 23:09:12 UTC (rev 57836)
+++ trunk/Master/tlpkg/bin/tl-check-fmttriggers 2021-02-21 23:18:27 UTC (rev 57837)
@@ -300,7 +300,8 @@
# we don't include these as fmttriggers since when they meaningfully
# change, fmtutil should get called anyway due to language.* changing.
- my @skip_pkgs = qw(dehyph-exptl ruhyphen ukrhyph);
+ my @skip_recorded = qw(dehyph-exptl ruhyphen ukrhyph);
+
# Anything matching hyphen-.* is also ignored, but not hyph-utf8.
for my $ef (sort keys %$pkgs_per_format) {
@@ -324,15 +325,6 @@
# 00texlive.autopatterns.tlpsrc.
delete $tlpdb_pkgs{"l3backend"};
- # These packages are also included as fmttriggers eventhough they
- # are not necessary, to simplify maintenance of the package lists.
- delete $tlpdb_pkgs{"atbegshi"};
- delete $tlpdb_pkgs{"atveryend"};
- delete $tlpdb_pkgs{"everyshi"};
- delete $tlpdb_pkgs{"latex"};
- delete $tlpdb_pkgs{"tex-ini-files"};
- delete $tlpdb_pkgs{"unicode-data"};
-
my @recorded_only = ();
for my $r (keys %recorded_pkgs) {
# no need for a package to include itself as a fmttrigger.
@@ -345,14 +337,23 @@
# triggers in the tlpdb, for no particular reason. Let that be
# ok, and only check for the skipped packages when making the
# trigger list for an engine.format not in tlpdb.
- next if grep ($_ eq $r, @skip_pkgs);
+ next if grep ($_ eq $r, @skip_recorded);
next if $r =~ /hyphen-.*/;
push (@recorded_only, $r);
}
}
if (keys %tlpdb_pkgs) {
+ # These packages are also included as fmttriggers even though
+ # they are not always necessary, to simplify maintenance of the
+ # package lists. So don't worry about them if they are present.
+ my @skip_tlpdb = qw(atbegshi atveryend everyshi latex
+ tex-ini-files unicode-data);
+ my %skip_tlpdb; @skip_tlpdb{@skip_tlpdb} = 1; # make into hash
+
tlwarn ("$prg: $ef triggers only in tlpdb: "
- . join (",", sort keys %tlpdb_pkgs) . "\n");
+ . join (",", sort
+ grep { ! exists $skip_tlpdb{$_} } keys %tlpdb_pkgs)
+ . "\n");
$bad_p = 1;
}
if (@recorded_only) {
More information about the tex-live-commits
mailing list.