*** shlib.conf.in.orig	2009-09-14 15:47:31.000000000 +0100
--- shlib.conf.in	2009-09-14 15:50:04.000000000 +0100
***************
*** 7,17 ****
      set _p($x) 1
  }
  
! foreach x [list "@TKLIB_PATH@" "@IWIDGETS_PATH@" "@ITCL_PATH@" "@ITK_PATH@"] {
      if {![info exists _p($x)]} {
          set _p($x) 1
  	lappend auto_path $x
      }
  }
- 
  unset _p
--- 7,20 ----
      set _p($x) 1
  }
  
! foreach x [list "@TKLIB_PATH@" "@IWIDGETS_PATH@"] {
      if {![info exists _p($x)]} {
          set _p($x) 1
  	lappend auto_path $x
      }
  }
  unset _p
+ 
+ set env(ITCL_LIBRARY) [lindex [glob "@ITCL_PATH@/itcl\[0-9\]*"] end]
+ set env(ITK_LIBRARY)  [lindex [glob "@ITK_PATH@/itk\[0-9\]*"] end]
+