diff options
author | Siep Kroonenberg <siepo@cybercomm.nl> | 2008-02-11 15:37:39 +0000 |
---|---|---|
committer | Siep Kroonenberg <siepo@cybercomm.nl> | 2008-02-11 15:37:39 +0000 |
commit | a0154d209461e576fd2e5429bbb67b73684ad040 (patch) | |
tree | ab96c8b37709ec06eecc71a14ee6452f19362a6f /Master/tlpkg/doc | |
parent | bd359b1896c7c36091ee6a8776bf2798cf8c3dbf (diff) |
TLWinGoo: added more quotes to
HKCR/script.texlua/shell/open/command.
Commented out hard assignments to basename in texlua scripts
Note. wingoo-demo probably dysfunctional ATM
git-svn-id: svn://tug.org/texlive/trunk@6607 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/doc')
-rw-r--r-- | Master/tlpkg/doc/wingoo-demo.pl | 24 |
1 files changed, 12 insertions, 12 deletions
diff --git a/Master/tlpkg/doc/wingoo-demo.pl b/Master/tlpkg/doc/wingoo-demo.pl index c73e3626d64..8e7359e0041 100644 --- a/Master/tlpkg/doc/wingoo-demo.pl +++ b/Master/tlpkg/doc/wingoo-demo.pl @@ -103,19 +103,19 @@ print "tex.exe found in " . # the problem case: no admin, but TeX on system path -if (!admin()) { - my $fn = expand_string("%windir%")."/TEX.EXE"; - $fn =~ s/\\/\//g; - create_file($fn); # a tex.exe on the system path! - add_texbindir_to_path(expand_string($wr_dir2)); - my @wge = wg_error(); - if (@wge) { - print $wge[1]."\n"; - } - print_search_paths(); - print "tex.exe found in " . TeXLive::TLWinGoo::win_which_dir("tex.exe") . "\n"; - unlink $fn; +my $admin_save = $TeXLive::TLWinGoo::is_admin; +$TeXLive::TLWinGoo::is_admin = 0; +my $fn = expand_string("%windir%")."/TEX.EXE"; +$fn =~ s/\\/\//g; +create_file($fn); # a tex.exe on the system path! +add_texbindir_to_path(expand_string($wr_dir2)); +my @wge = wg_error(); +if (@wge) { + print $wge[1]."\n"; } +print_search_paths(); +print "tex.exe found in " . TeXLive::TLWinGoo::win_which_dir("tex.exe") . "\n"; +unlink $fn; # adding a filetype |