# HG changeset patch # User Claus Gittinger # Date 1404995033 -7200 # Node ID 942467a126451fb370a8646709b4b387ce72fa45 # Parent 2f2efbd80f0cebebaac7619c7112497d449c32c1 displayOn: cleanup diff -r 2f2efbd80f0c -r 942467a12645 Iterator.st --- 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 $' ! !