TextCollector.st
changeset 6686 0e2f231411ff
parent 6685 8649058518e7
child 6726 9e386937fc31
equal deleted inserted replaced
6685:8649058518e7 6686:0e2f231411ff
   853     "Modified: 11.1.1997 / 14:42:41 / cg"
   853     "Modified: 11.1.1997 / 14:42:41 / cg"
   854 !
   854 !
   855 
   855 
   856 nextPut:something
   856 nextPut:something
   857     "append somethings printString to my displayed text.
   857     "append somethings printString to my displayed text.
       
   858      Answer something.
   858      This allows TextCollectors to be used Stream-wise"
   859      This allows TextCollectors to be used Stream-wise"
   859 
   860 
   860     |txt|
   861     |txt|
   861 
   862 
   862     (something isCharacter) ifTrue:[
   863     (something isCharacter) ifTrue:[