--- tkinfo.orig	Thu Mar  6 02:07:29 1997
+++ tkinfo	Thu Mar  6 11:41:30 1997
@@ -1,6 +1,6 @@
 #!/bin/sh
 # This is a Tcl/Tk script to be interpreted by wish (Tk4.0 or better): \
-exec wish "$0" "$@"
+exec wish4.1 "$0" "$@"
 
 ##########################################################################
 # Version of TkInfo:
@@ -443,7 +443,7 @@
 proc tkiInit { } {
     global tki env auto_path tkiEmbed geometry
 
-    set defInfoPath [list . \
+    set defInfoPath [list . /usr/share/info \
       /usr/info /usr/local/info /usr/local/gnu/info \
       /usr/local/emacs/info /usr/local/lib/emacs/info \
       /usr/lib/xemacs/info /usr/local/lib/xemacs/info \