white spaces...

src/Collections-Abstract/Collection.class.st

@@ -794,10 +794,10 @@ Collection >> identityIncludes: anObject [
 { #category : #testing }
 Collection >> ifEmpty: aBlock [
 	"Evaluate the given block, answering its value if the receiver is empty, otherwise answer the receiver."
-	
+
 	"Note that the fact that this method returns its receiver in case the receiver is not empty allows one to write expressions like the following ones: self classifyMethodAs: (myProtocol ifEmpty: ['As yet unclassified'])"
 
-	^ self isEmpty 
+	^ self isEmpty
 		ifTrue: [ aBlock value ]
 		ifFalse: [ self ]
 ]
@@ -830,7 +830,6 @@ Collection >> ifNotEmpty: notEmptyBlock ifEmpty: emptyBlock [
 	^ self isEmpty
 		ifTrue: [ emptyBlock value ]
 		ifFalse: [ notEmptyBlock cull: self ]
-
 ]
 
 { #category : #testing }