diff options
author | Reinhard Kotucha <reinhard.kotucha@web.de> | 2008-05-18 23:44:28 +0000 |
---|---|---|
committer | Reinhard Kotucha <reinhard.kotucha@web.de> | 2008-05-18 23:44:28 +0000 |
commit | 4ea09283f9abdb783e278db185a6ea5135918f3c (patch) | |
tree | eea140128be9c845dabbac3e4a537d40c5eee60d | |
parent | f0907030a4a3993604b9edc28feb258b7ec967d0 (diff) |
update Build/source/texk/texlive/getnonfreefonts.
git-svn-id: svn://tug.org/texlive/trunk@8216 c570f23f-e606-0410-a88d-b1316a301751
-rw-r--r-- | Build/source/texk/texlive/getnonfreefonts | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/Build/source/texk/texlive/getnonfreefonts b/Build/source/texk/texlive/getnonfreefonts index 9c419e65bd7..382a6f9c290 100644 --- a/Build/source/texk/texlive/getnonfreefonts +++ b/Build/source/texk/texlive/getnonfreefonts @@ -66,6 +66,7 @@ $^W=1 if $opt_debug; my $sys=($0=~/-sys$/)? 1:0; $sys=1 if $opt_sys; +$sys=1 if (defined $ENV{'TEX_SYS_PROG'}); @allpackages=@ARGV; @@ -100,10 +101,10 @@ sub debug_msg { sub expand_var { my $var=shift; - if (-d "/usr/bin") { - open KPSEWHICH, 'kpsewhich --expand-var=\$' . "$var |"; - } else { + if ($^O=~/^MSWin(32|64)/i) { open KPSEWHICH, 'kpsewhich --expand-var=$' . "$var |"; + } else { + open KPSEWHICH, 'kpsewhich --expand-var=\$' . "$var |"; } while (<KPSEWHICH>) { chop; @@ -112,7 +113,6 @@ sub expand_var { close KPSEWHICH; } - # get TMP|TEMP|TMPDIR environment variable if ($opt_debug) { |