Skip to content

Commit 7d5632e

Browse files
Enable the new gid feature condition with existing groups
1 parent 8a3c82f commit 7d5632e

1 file changed

Lines changed: 5 additions & 1 deletion

File tree

kratos.gid/scripts/Controllers/TreeInjections.tcl

Lines changed: 5 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -234,7 +234,11 @@ proc spdAux::_injectCondsToTree {basenode cond_list {cond_type "normal"} args }
234234
set state [$cnd getAttribute state]
235235
if {$state eq ""} {set state "CheckNodalConditionState"}
236236
}
237-
set node "<condition n='$n' pn='$pn' ov='$etype' ovm='' icon='shells16' help='$help' state='\[$state\]' update_proc='\[OkNewCondition\]' check='$check'>"
237+
set allow_group_creation ""
238+
if {[$cnd getAttribute Groups] ne ""} {
239+
set allow_group_creation "allow_group_creation='0' groups_list='\[[$cnd getAttribute Groups]\]'"
240+
}
241+
set node "<condition n='$n' pn='$pn' ov='$etype' ovm='' icon='shells16' help='$help' state='\[$state\]' update_proc='\[OkNewCondition\]' check='$check' $allow_group_creation>"
238242
set symbol_data [$cnd getSymbol]
239243
if { [llength $symbol_data] } {
240244
set txt "<symbol"

0 commit comments

Comments
 (0)