Merge fdcecd7

OpenPonk · Dec 5, 2024 · 883b0e7 · 883b0e7
2 parents 997b164 + fdcecd7
commit 883b0e7
Showing 1 changed file with 7 additions and 0 deletions.
diff --git a/repository/OpenPonk-BPMN/OPBPMNNodeModel.class.st b/repository/OpenPonk-BPMN/OPBPMNNodeModel.class.st
@@ -30,6 +30,13 @@ OPBPMNNodeModel >> addFlow: aFlow [
 		ifFalse: [ self changed ]
 ]
 
+{ #category : 'accessing' }
+OPBPMNNodeModel >> allElements [
+
+	^ super allElements , self flows
+	  , (self flows flatCollect: [ :each | each allElements ])
+]
+
 { #category : 'accessing' }
 OPBPMNNodeModel >> connected [
 	owner ifNil: [ ^ #() ].