Add Collection>>#select:thenCollect:

ba-st · Aug 7, 2023 · 5b91793 · 5b91793
1 parent c2fefdb
commit 5b91793
Showing 1 changed file with 6 additions and 0 deletions.
diff --git a/source/Buoy-Collections-GS64-Extensions/Collection.extension.st b/source/Buoy-Collections-GS64-Extensions/Collection.extension.st
@@ -13,3 +13,9 @@ Collection >> ifEmpty: emptyBlock ifNotEmpty: notEmptyBlock [
 		  ifTrue: emptyBlock
 		  ifFalse: [ notEmptyBlock cull: self ]
 ]
+
+{ #category : #'*Buoy-Collections-GS64-Extensions' }
+Collection >> select: selectBlock thenCollect: collectBlock [
+
+	^ (self select: selectBlock) collect: collectBlock
+]