*** ./tkinfo.ORIG	Tue Aug  9 22:59:57 2011
--- ./tkinfo	Tue Aug  9 23:00:30 2011
***************
*** 511,520 ****
      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 defInfoSuffix [list .info -info ""]
--- 511,517 ----
      if { [info exist tki(sn)] } return
  
      set defInfoPath [list . \
!       /usr/info /usr/share/info /usr/local/info /opt/freeware/info \
        ]
  
      set defInfoSuffix [list .info -info ""]