[:!let self_owned_parts [[:origin] owned_parts -class ::nx::doc::StructuredEntity]]
[:!let owned_parts [dict merge $project_entities $self_owned_parts]]
[:for feature [dict keys $owned_parts] {
[$feature pretty_plural]
[:for inst [dict get $owned_parts $feature] {
[:!let css "" ]
[:? {[:info has type [$feature part_class]] && [current] eq $inst} {
[:!let css "selected" ]
}]
[:? {[dict exists $self_owned_parts $feature]} {
[:! lappend css [expr {[$inst pinfo get -default 0 bundle call-protected]?"protected":""}]]
[:! lappend css [expr {[$inst !get @deprecated]?"deprecated":""}]]
[:! lappend css [$inst statustoken]]
[:!let css [linsert $css 0 filter]]
}]
[:!let css [join $css " "]]
- [:fit [$inst print_name] 30]
}]
}]