tixFileEntry:OpenFile dialogtype tk_chooseDirectory
Brought to you by:
idiscovery,
mikeclarkson
to re-create the error, run a tixFileEntry widget with -dialogtype set to tk_chooseDirectory
first click on file (directory) chooser button works
second click to choose file (directory) does nothing
Error is on line 187 as follows:
switch -- $data(-dialogtype) tk_chooseDirectory {
set args [list -parent [winfo toplevel $w]]
if {[set initial $data(-value)] != ""} {
# LINE 187 FOLLOWS, ERROR
lappend args -initialdir $data(value)
}
set retval [eval [linsert $args 0 tk_chooseDirectory]]
Replace line 187 with the following and further clicks on button to change directory will work:
lappend args -initialdir $data(-value)
# 'value' was missing '-' preceding
In CVS, the file is:
library/FileEnt.tcl
This is still a problem. It is distributed with Python3 (tix8.4.3).