diff options
| author | Norbert Preining <preining@logic.at> | 2011-06-03 06:03:23 +0000 |
|---|---|---|
| committer | Norbert Preining <preining@logic.at> | 2011-06-03 06:03:23 +0000 |
| commit | 2b3466aa2749af13a6a3f0b2d0204e705d43dfee (patch) | |
| tree | 9b2c4bdf61144183dd80685c87d00088fdc7518b /Master/tlpkg/TeXLive | |
| parent | 98ab89f5af0f55957051896b017e4a5e62c48e11 (diff) | |
use proper parenthesis in TLWinGoo
git-svn-id: svn://tug.org/texlive/trunk@22751 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive')
| -rw-r--r-- | Master/tlpkg/TeXLive/TLWinGoo.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Master/tlpkg/TeXLive/TLWinGoo.pm b/Master/tlpkg/TeXLive/TLWinGoo.pm index 612ed86dd2a..bb8cf2d9aa8 100644 --- a/Master/tlpkg/TeXLive/TLWinGoo.pm +++ b/Master/tlpkg/TeXLive/TLWinGoo.pm @@ -340,7 +340,7 @@ sub is_a_texdir { $sr =~ s/\\/\//g; $sr = $sr . '/' unless $sr =~ m!/$!; return 0 if index($d, $sr)==0; - foreach $p qw(luatex.exe mktexlsr.exe pdftex.exe tex.exe xetex.exe) { + foreach $p (qw(luatex.exe mktexlsr.exe pdftex.exe tex.exe xetex.exe)) { return 1 if (-e $d.$p); } return 0; |