summaryrefslogtreecommitdiff
path: root/Build/tools/tpm-ctan-check
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2006-12-31 23:43:51 +0000
committerKarl Berry <karl@freefriends.org>2006-12-31 23:43:51 +0000
commit076715feb370ff031fe1f9111d723331670a385e (patch)
treefccd642e5c16d8b6c7703493058cb3db76c848e8 /Build/tools/tpm-ctan-check
parente7c5a338a8a39e0964862cc028a9cef4c7ccf6e8 (diff)
pstricks-add update
git-svn-id: svn://tug.org/texlive/trunk@3074 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/tools/tpm-ctan-check')
-rwxr-xr-xBuild/tools/tpm-ctan-check6
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;