diff options
author | Karl Berry <karl@freefriends.org> | 2009-06-30 18:17:04 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2009-06-30 18:17:04 +0000 |
commit | b002e360a89e1f2e1b144927f932a048228a3316 (patch) | |
tree | 56717a38ea08eccf2a9fc9f4318a94ef70cb4838 /Master/texmf/scripts | |
parent | 05411583330ed029acaf3bc63a519ed4e5e91f36 (diff) |
(check_executes): omit special case for cygwin
made in r13816, no longer needed.
git-svn-id: svn://tug.org/texlive/trunk@14027 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf/scripts')
-rwxr-xr-x | Master/texmf/scripts/texlive/tlmgr.pl | 17 |
1 files changed, 2 insertions, 15 deletions
diff --git a/Master/texmf/scripts/texlive/tlmgr.pl b/Master/texmf/scripts/texlive/tlmgr.pl index 2e8ed2e2454..979ac2c373b 100755 --- a/Master/texmf/scripts/texlive/tlmgr.pl +++ b/Master/texmf/scripts/texlive/tlmgr.pl @@ -34,7 +34,7 @@ our $Master; BEGIN { $^W = 1; # make subprograms (including kpsewhich) have the right path: - my $bindir, $kpsewhichname; + my ($bindir, $kpsewhichname); if ($^O =~ /^MSWin/i) { # on win32 $0 points directly to tlmgr.pl; it can be relative $Master = "$0/../../../.."; @@ -2776,20 +2776,7 @@ sub check_executes { for my $a ($localtlpdb->available_architectures) { my $f = "$Master/bin/$a/$name"; if (!check_file($a, $f)) { - if ($a eq "i386-cygwin") { - # on cygwin the following can happen: xmltex -> pdftex, but - # there is only pdftex.exe, so -r does not succeed - if (-l $f) { - my $ld = readlink ($f); - if (!check_file($a, "$Master/bin/$a/$ld")) { - push @{$missingbins{$_}}, "bin/$a/$name" if $mode; - } - } else { - push @{$missingbins{$_}}, "bin/$a/$name" if $mode; - } - } else { - push @{$missingbins{$_}}, "bin/$a/$name" if $mode; - } + push @{$missingbins{$_}}, "bin/$a/$name" if $mode; } if (!check_file($a, "$Master/bin/$a/$engine")) { push @{$missingengines{$_}}, "bin/$a/$engine" if $mode; |