--- a/Iterator.st Wed Jul 09 22:33:44 2014 +0200
+++ b/Iterator.st Thu Jul 10 14:23:53 2014 +0200
@@ -396,7 +396,7 @@
!Iterator methodsFor:'printing & storing'!
displayOn:aGCOrStream
- (aGCOrStream isStream or:[aGCOrStream == Transcript]) ifTrue:[
+ (aGCOrStream isStream) ifTrue:[
aGCOrStream nextPutAll:'Iterator('.
block displayOn:aGCOrStream.
^ self
@@ -447,10 +447,10 @@
!Iterator class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic2/Iterator.st,v 1.29 2014-03-05 13:19:34 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic2/Iterator.st,v 1.30 2014-07-10 12:23:53 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic2/Iterator.st,v 1.29 2014-03-05 13:19:34 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic2/Iterator.st,v 1.30 2014-07-10 12:23:53 cg Exp $'
! !