diff options
Diffstat (limited to 'Master/texmf')
-rw-r--r-- | Master/texmf/scripts/tetex/texdoctk.pl | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/Master/texmf/scripts/tetex/texdoctk.pl b/Master/texmf/scripts/tetex/texdoctk.pl index 32ca13dd577..147553a1a1c 100644 --- a/Master/texmf/scripts/tetex/texdoctk.pl +++ b/Master/texmf/scripts/tetex/texdoctk.pl @@ -1,3 +1,4 @@ +#! /usr/bin/env perl ############################################################################### # texdoctk v.0.6.0 (Nov 5, 2004) - GUI for TeX documentation access # Copyright (C) 2000-2004 Thomas Ruedas @@ -14,8 +15,10 @@ use File::Basename; my $IsWin32 = ($^O =~ /MSWin32/i); if ($IsWin32) { -# use Win32::Registry; - use Win32::API; + require Win32::API; +# Win32::API->import( qw( +# &something +# )); } # initialization of some internal variables @@ -689,7 +692,7 @@ sub finddoc { $slcdoc=""; return $slcdoc; } - last CMPREND; does not work, what we need is: +# last CMPREND; does not work, what we need is: return $slcdoc; } } |