tk_getSaveFile run with fileevent through a process hangs wi

not registered... ben@warre.co.uk

From Comp.lang.tcl:

OK, I am running ActiveTCL 8.4.4.0 on Windows XP
Professional. The
following two scripts recreate the problem on my
machine.

runme.tcl:

set r [open "|wish ui.tcl" r+]

after 500

puts $r "save"
flush $r

ui.tcl:

proc msg {} {
gets stdin r
if {[eof stdin]} {exit}
eval $r
}

proc save {} {
tk_getSaveFile
update
}

fileevent stdin readable msg

I have attached them as well.

Ben

"Bruce Hartweg" <bruce-news@hartweg.us> wrote in
message
news:owaZb.360188$na.537596@attbi_s04...
> can you post a short case that demonstrates the
problem?
> If it is truly an issue with tk_getSaveFile it wil help
> the maintainers find & fix the bug. but it will also allow
> people to help detect if the problem is on your end.
> (if I was a bettin' man, I'd lay odds on the latter ;)
>
> Also what platfom/OS and what version of Tcl/Tk ?
>
>
> bruce
>
>
>
> Ben John Warre wrote:
>
> > I think this is a real problem, but have localised it
somewhat. The
> > script works fine if I run it normally, but when I run
it as a process
> > (from another tcl script), the dialog hangs (and
doesn't get destroyed),
> > when you press Save.
> >