From 0def984534072a42a46f4a13089f1d48ab61f6bb Mon Sep 17 00:00:00 2001
From: Siep Kroonenberg <siepo@cybercomm.nl>
Date: Sun, 5 Jul 2009 18:20:54 +0000
Subject: fix for TL in root (e.g. of dvd)

git-svn-id: svn://tug.org/texlive/trunk@14120 c570f23f-e606-0410-a88d-b1316a301751
---
 Master/bin/win32/dviout.bat | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

(limited to 'Master/bin/win32/dviout.bat')

diff --git a/Master/bin/win32/dviout.bat b/Master/bin/win32/dviout.bat
index d09e13602f9..0bbba5e44f0 100755
--- a/Master/bin/win32/dviout.bat
+++ b/Master/bin/win32/dviout.bat
@@ -16,8 +16,10 @@ set tlroot=
 for /f "tokens=1,2 delims=;" %%I in (
   'kpsewhich --expand-var "$SELFAUTOPARENT;$TEXMFVAR"'
 ) do (
-  set tlroot=%%~sfI
-  set fontsdir=%%~fJ\fonts
+  if %%I==%%~dI set tlroot=%%I
+  if not %%I==%%~dI set tlroot=%%~sfI
+  if %%J==%%~dJ set fontsdir=%%J\fonts
+  if not %%J==%%~dJ set fontsdir=%%~fJ\fonts
 )
 if not defined tlroot goto :no_tl
 if not exist "%fontsdir%\" md "%fontsdir%"
-- 
cgit v1.2.3