luke/magic
1
0
Fork 0
mirror of https://github.com/RTimothyEdwards/magic.git synced 2026-10-06 09:53:00 +02:00
Code Issues Packages Projects Releases Wiki Activity

Corrected a problem from the last commit that causes error messages

Browse Source 
in the toolkit Tk window when any parameter is modified, due do the
use of a variable before its being defined in the dialog update.
This commit is contained in:
Tim Edwards
2019-11-22 11:37:04 -05:00
parent 27ed2bf975
commit 7373d55c55
1 changed files with 6 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files
tcltk/toolkit.tcl
+6 -2
View File
@@ -568,12 +568,16 @@ proc magic::add_dependency {callback gencell_type library args} {
#----------------------------------------------------------
proc magic::update_dialog {callback pname gencell_type library} {
set pdefaults [${library}::${gencell_type}_defaults]
set parameters [dict merge $pdefaults [magic::gencell_getparams]]
if {[dict exists $parameters gencell]} {
# Setting special parameter "gencell" forces the gencell to change type
set gencell_type [dict get $parameters gencell]
set pdefaults [${library}::${gencell_type}_defaults]
set parameters [dict merge $pdefaults [magic::gencell_getparams]]
}
set pdefaults [${library}::${gencell_type}_defaults]
set parameters [dict merge $pdefaults [magic::gencell_getparams]]
if {$callback != {}} {
set parameters [$callback $pname $parameters]
}