Collection.st
changeset 22603 720ad3117958
parent 22582 d31fd43ab874
child 22622 b044b21ece42
--- a/Collection.st	Thu Mar 08 13:34:04 2018 +0100
+++ b/Collection.st	Thu Mar 08 13:41:08 2018 +0100
@@ -503,12 +503,9 @@
     |action|
 
     action := self isEmpty ifTrue:[ ifEmptyValue ] ifFalse:[ ifNotEmptyValue ].
-    (action isBlock and:[action argumentCount == 1]) ifTrue:[
-        ^ action value:self 
-    ].
-    ^ action value
-
-    "Modified: / 09-10-2017 / 17:16:07 / stefan"
+    ^ action valueWithOptionalArgument:self.
+
+    "Modified: / 08-03-2018 / 11:36:42 / stefan"
 !
 
 ifEmpty:ifEmptyValue ifNotEmptyDo:ifNotEmptyValue