--- tkinfo.orig	Mon Mar 27 19:59:24 2000
+++ tkinfo	Mon Mar 27 19:59:45 2000
@@ -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 wish8.4 "$0" "$@"
 
 
 ##########################################################################
@@ -509,7 +509,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 \
