summaryrefslogtreecommitdiffstats
path: root/library/xmfbox.tcl
diff options
context:
space:
mode:
Diffstat (limited to 'library/xmfbox.tcl')
-rw-r--r--library/xmfbox.tcl8
1 files changed, 8 insertions, 0 deletions
diff --git a/library/xmfbox.tcl b/library/xmfbox.tcl
index 361f08a..39ef16d 100644
--- a/library/xmfbox.tcl
+++ b/library/xmfbox.tcl
@@ -51,6 +51,14 @@ proc tkMotifFDialog {args} {
} elseif {[string compare [winfo class $w] TkMotifFDialog]} {
destroy $w
tkMotifFDialog_Create $w
+ } else {
+ set data(fEnt) $w.top.f1.ent
+ set data(dList) $w.top.f2.a.l
+ set data(fList) $w.top.f2.b.l
+ set data(sEnt) $w.top.f3.ent
+ set data(okBtn) $w.bot.ok
+ set data(filterBtn) $w.bot.filter
+ set data(cancelBtn) $w.bot.cancel
}
wm transient $w $data(-parent)