diff options
Diffstat (limited to 'Build/tools/tpm-ctan-check')
-rwxr-xr-x | Build/tools/tpm-ctan-check | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/Build/tools/tpm-ctan-check b/Build/tools/tpm-ctan-check index 1322f4b4669..13850865423 100755 --- a/Build/tools/tpm-ctan-check +++ b/Build/tools/tpm-ctan-check @@ -198,6 +198,7 @@ sub do_tpm my $needed = 0; my %tpm = &read_tpm ($tpm); + return 1 unless keys %tpm; my @tpm_files = @{$tpm{"files"}}; my @compared = (); @@ -296,7 +297,10 @@ sub read_tpm $me =~ s/\.tpm$//; chomp (my $ctan_dir = `$mydir/tlpkginfo --ctan-dir '$me'`); - die "$0: no CTAN directory for $me\n" if ! $ctan_dir; + if (! $ctan_dir) { + warn "$0: oops, no CTAN directory for $me, fix fix\n"; + return (); + } $ret{"CTANdir"} = $ctan_dir; return %ret; |