Fixed OPNoShape returning arrays

OpenPonk · Nov 23, 2024 · bbdac18 · bbdac18
1 parent 0cc62c7
commit bbdac18
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 4 deletions.
diff --git a/repository/OpenPonk-Core/OPDiagramElement.class.st b/repository/OpenPonk-Core/OPDiagramElement.class.st
@@ -525,7 +525,7 @@ OPDiagramElement >> resolveAllModelElements: aCollection [
 
 	| success |
 	success := self resolveModelElements: aCollection.
-	self ownedElements: (self ownedElements select: [ :each |
+	self ownedElements removeAll: (self ownedElements reject: [ :each |
 			 each resolveAllModelElements: aCollection ]).
 	^ success
 ]

diff --git a/repository/OpenPonk-Core/OPNoShape.class.st b/repository/OpenPonk-Core/OPNoShape.class.st
@@ -93,7 +93,7 @@ OPNoShape >> ownedElement: anOPPetriNetPTPlaceShape willRenderIn: aRSCanvas [
 { #category : 'accessing' }
 OPNoShape >> ownedElements [
 
-	^ #(  )
+	^ OrderedCollection empty
 ]
 
 { #category : 'introspection' }
@@ -139,13 +139,13 @@ OPNoShape >> sharedStyle [
 { #category : 'accessing' }
 OPNoShape >> sourceEdges [
 
-	^ #(  )
+	^ OrderedCollection empty
 ]
 
 { #category : 'accessing' }
 OPNoShape >> targetEdges [
 
-	^ #(  )
+	^ OrderedCollection empty
 ]
 
 { #category : 'subscription' }