From 87044bcebce612069093f357cbb631a24b45b5ea Mon Sep 17 00:00:00 2001 From: Reinhard Kotucha Date: Mon, 24 Jan 2011 22:18:54 +0000 Subject: tlpkg/dev/updmap.pl: kpsewhich: s/expand-path/show-path/ git-svn-id: svn://tug.org/texlive/trunk@21167 c570f23f-e606-0410-a88d-b1316a301751 --- Master/tlpkg/dev/updmap.pl | 11 ++++------- 1 file changed, 4 insertions(+), 7 deletions(-) (limited to 'Master') diff --git a/Master/tlpkg/dev/updmap.pl b/Master/tlpkg/dev/updmap.pl index 16d1004fc37..72994713476 100755 --- a/Master/tlpkg/dev/updmap.pl +++ b/Master/tlpkg/dev/updmap.pl @@ -272,14 +272,11 @@ sub newmktexupd { my @texmfdbs; my $delim; - if (win32()) { - $TEXMFDBS=`kpsewhich --expand-path="\$TEXMFDBS"`; - $delim=';'; - } else { - $TEXMFDBS=`kpsewhich --expand-path='\$TEXMFDBS'`; - $delim=':'; - } + $TEXMFDBS=`kpsewhich --show-path="ls-R"`; chomp ($TEXMFDBS); + + $delim= (&win32())? ';' : ':'; + my @texmfdbs=split ($delim, "$TEXMFDBS"); my %dbs; -- cgit v1.2.3