From 22591f8f533f27ac66dc4fbaacedf25c1870cd18 Mon Sep 17 00:00:00 2001 From: Siep Kroonenberg Date: Mon, 25 Feb 2008 19:41:48 +0000 Subject: Added: tlpkg/installer/uninstall-try.[pl|bat], only tested under windows. It just undoes registry- and environment settings. Also: perllib/Win32/Env.pm removed. git-svn-id: svn://tug.org/texlive/trunk@6754 c570f23f-e606-0410-a88d-b1316a301751 --- Master/tlpkg/doc/wingoo-demo.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'Master/tlpkg/doc/wingoo-demo.pl') diff --git a/Master/tlpkg/doc/wingoo-demo.pl b/Master/tlpkg/doc/wingoo-demo.pl index bcf4759d25d..4be176de85a 100644 --- a/Master/tlpkg/doc/wingoo-demo.pl +++ b/Master/tlpkg/doc/wingoo-demo.pl @@ -16,7 +16,7 @@ BEGIN { if ($me=~m!/!) { # wingoo-demo now in a subsubdirectory: - ($::installerdir=$me)=~s!(.*)\/tlpkg\/doc\/.*$!$1!; + ($::installerdir=$me)=~s!(.*)/[^/]+/[^/]+/[^/]*$!$1!; } else { # This shouldn't occur if called from batchfile $::installerdir='./../..'; @@ -26,7 +26,7 @@ BEGIN { } use TeXLive::TLUtils qw( get_system_tmpdir ); -use TeXLive::TLWinGooTry qw( +use TeXLive::TLWinGoo qw( &admin &non_admin &admin_again -- cgit v1.2.3