16 lines
895 B
Text
16 lines
895 B
Text
$NetBSD: patch-ag,v 1.3 2005/10/26 04:22:38 minskim Exp $
|
|
|
|
--- itcl/generic/itcl_cmds.c.orig 2001-05-21 20:50:21.000000000 -0500
|
|
+++ itcl/generic/itcl_cmds.c
|
|
@@ -62,9 +62,9 @@ namespace eval ::itcl {\n\
|
|
if {[info exists env(ITCL_LIBRARY)]} {\n\
|
|
lappend dirs $env(ITCL_LIBRARY)\n\
|
|
}\n\
|
|
- lappend dirs [file join [file dirname $tcl_library] itcl$version]\n\
|
|
+ lappend dirs [file join [file dirname $tcl_library] tcl itcl$version]\n\
|
|
set bindir [file dirname [info nameofexecutable]]\n\
|
|
- lappend dirs [file join $bindir .. lib itcl$version]\n\
|
|
+ lappend dirs [file join $bindir .. lib tcl itcl$version]\n\
|
|
lappend dirs [file join $bindir .. library]\n\
|
|
lappend dirs [file join $bindir .. .. library]\n\
|
|
lappend dirs [file join $bindir .. .. itcl library]\n\
|