summaryrefslogtreecommitdiff
path: root/lang/tcl-itcl-current/patches/patch-ag
blob: a94e22ac078f69afebe093ad4ae3d6c84cc05634 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
$NetBSD: patch-ag,v 1.1.1.1 2004/09/24 21:16:02 dmcmahill 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\