Arno Nauerth

Now, that I wrote this, I found th problem: it is the lappend instruction, it should be lappend ::auto_path $path Feel quite a bit stupid now ;-)

I spent now days in getting this done but without any success (yes: I read through all publications so far). Here is the problem in short: in my TclTk script I have the following instructions if {[namespace exists ::freewrap]} { set path [file dirname [lindex [::zvfs::list /BWidget1.9.8/pkgIndex.tcl] 0]] lappend autopath $path tkmessageBox -message "$path exists = [file exists $path]" } package require BWidget The output is tk_messageBox: /home/an/pvInsight/BWidget1.9.8 exits 1 Script error: can't...

Dear Dennis, thank you for your help and sorry for the late answer. I had the idea that TclTk scripts do not need to be modified when wrapped, so I only modified the auto_path which obviously does not work for the sourcing. So I made an conditional section in loading the files like if {[namespace exists ::freewrap]} { source [::zvfs::list */utils/u1.tcl] ... } else { source $::env(SrcPath)/utils/u1.tcl ... I think it would be of great help if something like that were in the manual Best regards, Arno...

I have my tclTk- files stored in subdirectories, say apps and utils. The entry is in util, lets say util/main.tcl which also sources in e.g. two utilities like u1 and u2. I would like to create an executalbe for e.g. apps/myApp.tcl. So I create it by freewrap utils/main.tcl utils/u1.tcl utils/u2.tck apps/myApp.tcl -o myApp No matter of what I do, sourcing in utils/u1.tcl anf utils/u2.tcl end up with the error message "Error sourcing ... " Is there a possibilitiy of wrapping sub directories so that...