Re: Tk Script It problem
- From: steveo@xxxxxxxxxxxxxxxx
- Date: 29 Jan 2007 07:34:38 -0800
On Jan 27, 2:12 pm, Ian Bell <ruffreco...@xxxxxxxxxxx> wrote:
I am using Tk Script It as a simple IDE - it does what I want; syntax
highlighting and script launch.
All is fine if I run it from its own directory. However, when it launches
your script it sources a console script in the same directory. This works
fine if Script It itself is launched from that directory but otherwise (e.g
if I launch it from desktop icon) a 'no such file or directory' error
occurs. It works if I hard code the full path but that is not portable. I
tried prepending $::argv0 but that gives me a 'can't read ::argv0: no such
variable' error which somewhat surprised me. The proc that launches your
script is:
proc test_this { } {
global platform
set bool [interp exists test_bed]
if {$bool == 1} {
interp delete test_bed
}
interp create test_bed
test_bed alias exit interp delete test_bed
load {} Tk test_bed
set filename temp.tcl
set fd [open $filename w]
set data [.text.t get 1.0 end]
puts -nonewline $fd $data
close $fd
test_bed eval {
source crosscon.tcl
source temp.tcl
}
file delete temp.tcl
}Any help appreciated.
Ian ,
I have a fix for this ... somewhere ... honest ;)
It may take me a day or two to find it.
I apologize for the delay, but it has been several years
since the project was in active development.
Steve
.
- Follow-Ups:
- Re: Tk Script It problem
- From: Ian Bell
- Re: Tk Script It problem
- References:
- Tk Script It problem
- From: Ian Bell
- Tk Script It problem
- Prev by Date: What's going on at the wiki?
- Next by Date: Re: What's going on at the wiki?
- Previous by thread: Tk Script It problem
- Next by thread: Re: Tk Script It problem
- Index(es):
Relevant Pages
|
