This is the mail archive of the mailing list for the Insight project.

Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

[PATCH/itcl] Fix running in builddir


I haven't been using built-in tcl et al for a while, but with the recent patch submissions, I decided to give it a whirl.

Turns out that insight would no longer run from the build directory. I tracked this down to a failure to instantiate an iwidgets::scrolledtext widget. This happens because the auto_path for iwidgets is set relative to the build directory, and that's not where the actual scripts files are.

To run from the build directory, we also need to add the source directory to the auto_path. This is what this patch does.


2012-03-23  Keith Seitz  <>

* Add source directories to the auto_path.

Index: itcl/iwidgets/
RCS file: /cvs/src/src/itcl/iwidgets/,v
retrieving revision 1.2
diff -u -p -r1.2
--- itcl/iwidgets/	22 Jul 2008 20:32:46 -0000	1.2
+++ itcl/iwidgets/	23 Mar 2012 20:39:53 -0000
@@ -25,7 +25,13 @@ namespace eval ::iwidgets {
     variable version @VERSION@
+set cvsSrcDir [file join $iwidgets::library .. .. .. src itcl iwidgets]
+set gitSrcDir [file join $iwidgets::library .. .. .. gdb itcl iwidgets]
 lappend auto_path $iwidgets::library \
 		  [file join $iwidgets::library generic] \
-		  [file join $iwidgets::library scripts]
+		  [file join $iwidgets::library scripts] \
+		  [file join $cvsSrcDir generic] \
+		  [file join $cvsSrcDir scripts] \
+		  [file join $gitSrcDir generic] \
+		  [file join $gitSrcDir scripts]
 package provide Iwidgets $iwidgets::version

Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]