File itcl-3.4-findinit.patch of Package itcl
--- incrtcl-20071231cvs/generic/itcl_cmds.c.orig 2009-07-11 16:24:45.000000000 -0700
+++ incrtcl-20071231cvs/generic/itcl_cmds.c 2009-07-11 16:30:04.000000000 -0700
@@ -70,7 +70,7 @@
lappend dirs [file join $bindir .. .. itcl library]\n\
lappend dirs [file join $bindir .. .. .. itcl library]\n\
# On MacOSX, check the directories in the tcl_pkgPath\n\
- if {[string equal $::tcl_platform(platform) \"unix\"] && \
+ if {[string equal $::tcl_platform(platform) \"unix\"] || \
[string equal $::tcl_platform(os) \"Darwin\"]} {\n\
foreach d $::tcl_pkgPath {\n\
lappend dirs [file join $d itcl$version]\n\