blob: 87693e95534b4db9a809c1128f43b00254f410c8 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
$NetBSD: patch-ag,v 1.2 2004/05/12 23:38:35 minskim Exp $
--- itcl/generic/itcl_cmds.c.orig 2000-08-28 22:58:00.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\
|
