--- 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 $'
 ! !