libmodules.tcl: handle new format of OverlayDict

This commit is contained in:
2021-12-13 09:37:58 +01:00
parent 7983a03221
commit 43831c4660
+2 -1
View File
@@ -79,7 +79,8 @@ proc module-addgroup { group } {
foreach overlay $::OverlayList {
lappend overlays_to_add $overlay
debug $overlay
if { [string compare $::OverlayDict($overlay) $::ol_replacing] == 0 } {
set ol_type [lindex [split $OverlayDict($overlay) ":"] 0]
if { [string compare $ol_type $::ol_replacing] == 0 } {
break
}
}