diff options
| author | Norbert Preining <preining@logic.at> | 2008-05-20 15:29:35 +0000 |
|---|---|---|
| committer | Norbert Preining <preining@logic.at> | 2008-05-20 15:29:35 +0000 |
| commit | fb5d702c9835db5e66b67d0149640ed702add4a7 (patch) | |
| tree | 21d23e17faf1a686dd957b7c296b8e93f57b43f7 /Master/tlpkg | |
| parent | fbf06d49dc44d33d38145d1d836313d5800b49bb (diff) | |
TLWinGoo.pm: fix first installation. mkdirhier does not return true or false
git-svn-id: svn://tug.org/texlive/trunk@8251 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg')
| -rw-r--r-- | Master/tlpkg/TeXLive/TLWinGoo.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/Master/tlpkg/TeXLive/TLWinGoo.pm b/Master/tlpkg/TeXLive/TLWinGoo.pm index 884a8b480dd..a44ca6a7c0d 100644 --- a/Master/tlpkg/TeXLive/TLWinGoo.pm +++ b/Master/tlpkg/TeXLive/TLWinGoo.pm @@ -936,7 +936,8 @@ sub add_menu_shortcut { if ((-e $shpath) and not (-d $shpath)) { next; # fail silently and don't worry about it } elsif (not (-d $shpath)) { - return unless mkdirhier ($shpath); + mkdirhier($shpath); + #return unless mkdirhier ($shpath); } $shfile = $shpath.'/'.$name.'.lnk'; $shc->Save($shfile); |