diff options
author | Norbert Preining <preining@logic.at> | 2008-06-24 06:24:14 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2008-06-24 06:24:14 +0000 |
commit | 3e6c71a7daf2bf74f3ddf9c378cca70a47713a10 (patch) | |
tree | 06f8a4e416268a9aade0452912a7ada3ba2a8f84 /Master/tlpkg/bin/check-execute-consistency | |
parent | 7025696e391a06d64c6f0d7da6b817e4cc20d74f (diff) |
check-execute-consistency: try checking for the loader hyphen file
git-svn-id: svn://tug.org/texlive/trunk@8964 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/bin/check-execute-consistency')
-rwxr-xr-x | Master/tlpkg/bin/check-execute-consistency | 15 |
1 files changed, 14 insertions, 1 deletions
diff --git a/Master/tlpkg/bin/check-execute-consistency b/Master/tlpkg/bin/check-execute-consistency index 4dac9995f32..0d658a475a9 100755 --- a/Master/tlpkg/bin/check-execute-consistency +++ b/Master/tlpkg/bin/check-execute-consistency @@ -50,7 +50,7 @@ sub main my $foo = $1; chomp($foo); push @{$fmtcodes{$foo}}, $pkg; - } elsif ($e =~ m/AddHyphen\s+(.*)$/) { + } elsif ($e =~ m/AddHyphen\s+.*\s*lang=(\S+)\s+.*$/) { my $foo = $1; chomp($foo); push @{$langcodes{$foo}}, $pkg; @@ -86,6 +86,19 @@ sub main print "\t$mf (execute in @{$badmaps{$mf}})\n"; } } + my %badhyphcodes; + foreach my $lc (keys %langcodes) { + my @found = $tlpdb->find_file("texmf-dist/tex/generic/hyph-utf8/loadhyph/$lc"); + if ($#found < 0) { + $badhyphcodes{$lc} = $langcodes{$lc}; + } + } + if (keys %badhyphcodes) { + print "mentioned hyphen loaders without file:\n"; + foreach my $mf (keys %badhyphcodes) { + print "\t$mf (execute in @{$badhyphcodes{$mf}})\n"; + } + } my %badfmtcodes; foreach my $lc (keys %fmtcodes) { my @found = $tlpdb->find_file("texmf/fmtutil/format.$lc.cnf"); |