summaryrefslogtreecommitdiffstats
path: root/library/xmfbox.tcl
diff options
context:
space:
mode:
Diffstat (limited to 'library/xmfbox.tcl')
-rw-r--r--library/xmfbox.tcl2
1 files changed, 1 insertions, 1 deletions
diff --git a/library/xmfbox.tcl b/library/xmfbox.tcl
index 0cbf251..a1d6048 100644
--- a/library/xmfbox.tcl
+++ b/library/xmfbox.tcl
@@ -159,7 +159,7 @@ proc ::tk::MotifFDialog_FileTypes {w} {
set initialTypeName [lindex $data(-filetypes) 0 0]
if {$data(-typevariable) ne ""} {
upvar #0 $data(-typevariable) typeVariable
- if {[info exist typeVariable]} {
+ if {[info exists typeVariable]} {
set initialTypeName $typeVariable
}
}