$NetBSD: patch-aa,v 1.6 2004/05/12 15:08:20 minskim Exp $

--- tkinfo.orig	2004-03-22 17:56:39.000000000 -0600
+++ tkinfo
@@ -510,11 +510,9 @@ proc tkiInit { } {
     # No need to do this if we have been called before
     if { [info exist tki(sn)] } return
 
-    set defInfoPath [list . \
-      /usr/info /usr/share/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 \
-      /usr/gnu/info \
+    set defInfoPath [list . /usr/share/info \
+      @LOCALBASE@/info @X11BASE@/info \
+	  /usr/info /usr/local/info \
       ]
 
     set defInfoSuffix [list .info -info ""]
