remove typevariable (not available for all environments)

This commit is contained in:
Joachim Schoeberl 2009-10-09 13:48:43 +00:00
parent 1600d09c53
commit 84fda5f10b

View File

@ -48,7 +48,8 @@ menu .ngmenu.file
# {"Naomi Geometry" {.nao} }
# {"New Geometry file" {.ngg} }
set file [tk_getOpenFile -filetypes $types -initialdir $dirname -typevariable loadgeomtypevar]
# set file [tk_getOpenFile -filetypes $types -initialdir $dirname -typevariable loadgeomtypevar]
set file [tk_getOpenFile -filetypes $types -initialdir $dirname]
if {$file != ""} {
AddRecentFile $file
Ng_LoadGeometry $file