summaryrefslogtreecommitdiff
path: root/Master/texmf/scripts/tetex/texdoctk.pl
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf/scripts/tetex/texdoctk.pl')
-rw-r--r--Master/texmf/scripts/tetex/texdoctk.pl9
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;
}
}