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

Ensure layer name compatibility in wrapper.tcl

Browse Source 
Added check for 'none' layer name to ensure backwards compatibility.
This commit is contained in:
Ahmed Nematallah
2026-05-02 22:50:25 +02:00
committed by GitHub
parent 3c2b04a996
commit bf9ecbde75
1 changed files with 3 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
tcltk/wrapper.tcl
+3 -1
View File
@@ -728,7 +728,9 @@ proc magic::toolupdate {win {yesno "yes"} {layerlist ""}} {
# Don't do anything if toolbar is not present # Don't do anything if toolbar is not present
if { $Winopts(${topname},toolbar) == 0 } { return } if { $Winopts(${topname},toolbar) == 0 } { return }
if {$layerlist == ""} { # To ensure backwards compatibility, we check if the
# layer is called none, so avoid naming a layer none.
if {$layerlist == "" || $layerlist == "none"} {
set layerlist $yesno set layerlist $yesno
set yesno "yes" set yesno "yes"
} }