diff options
author | Reinhard Kotucha <reinhard.kotucha@web.de> | 2007-11-27 22:15:28 +0000 |
---|---|---|
committer | Reinhard Kotucha <reinhard.kotucha@web.de> | 2007-11-27 22:15:28 +0000 |
commit | f234e5630d28e2a177851f06dba5030ac76d3773 (patch) | |
tree | c8c24d56627fcd0c1cad9bd9d59f8998fcbff7dc /Master/install-tl.pl | |
parent | cce48f14e333839251891c034ae0b27dd3b5e2cb (diff) |
install-tl.pl: fixed $installerdir
git-svn-id: svn://tug.org/texlive/trunk@5632 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/install-tl.pl')
-rwxr-xr-x | Master/install-tl.pl | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/Master/install-tl.pl b/Master/install-tl.pl index 661f334835b..0174f31bac8 100755 --- a/Master/install-tl.pl +++ b/Master/install-tl.pl @@ -13,7 +13,11 @@ BEGIN { $^W = 1; my $me=$0; $me=~s!\\!/!g if $^O=~/^MSWin(32|64)$/i; - ($installerdir=$me)=~s!(.*)/.*$!$1!; + if ($me=~m!/!) { + ($installerdir=$me)=~s!(.*)/.*$!$1!; + } else { + $installerdir='.'; + } unshift (@INC, "$installerdir/tlpkg"); } |