--- a/Collection.st	Fri Mar 16 11:45:00 2018 +0100
+++ b/Collection.st	Fri Mar 16 12:18:50 2018 +0100
@@ -366,8 +366,6 @@
     ^ self
 ! !
 
-
-
 !Collection methodsFor:'Compatibility-ANSI'!
 
 identityIncludes:anObject
@@ -724,10 +722,12 @@
      If it's empty, return nil.
      (i.e. don't trigger an error as done in #first)"
 
-    ^ self firstIfEmpty:nil
+    self isEmpty ifTrue:[^ nil].
+    ^ self first.
 
     "Created: / 04-06-2007 / 22:36:07 / cg"
     "Modified (comment): / 13-02-2017 / 19:58:28 / cg"
+    "Modified: / 16-03-2018 / 12:16:11 / stefan"
 !
 
 fourth