equal
deleted
inserted
replaced
631 |
631 |
632 nextPutAll:something |
632 nextPutAll:something |
633 "append all of something to my displayed text. |
633 "append all of something to my displayed text. |
634 This allows TextCollectors to be used Stream-wise" |
634 This allows TextCollectors to be used Stream-wise" |
635 |
635 |
636 currentEmphasis notNil ifTrue:[ |
636 self show:(currentEmphasis notNil |
637 ^ self show:(something emphasizeAllWith:currentEmphasis) |
637 ifTrue:[something emphasizeAllWith:currentEmphasis] |
638 ]. |
638 ifFalse:[something]) |
639 ^ self show:something |
|
640 |
639 |
641 "Modified: 11.1.1997 / 14:43:26 / cg" |
640 "Modified: 11.1.1997 / 14:43:26 / cg" |
642 ! |
641 ! |
643 |
642 |
644 show:anObject |
643 show:anObject |
848 ! ! |
847 ! ! |
849 |
848 |
850 !TextCollector class methodsFor:'documentation'! |
849 !TextCollector class methodsFor:'documentation'! |
851 |
850 |
852 version |
851 version |
853 ^ '$Header: /cvs/stx/stx/libwidg/TextCollector.st,v 1.95 2009-03-15 12:31:24 cg Exp $' |
852 ^ '$Header: /cvs/stx/stx/libwidg/TextCollector.st,v 1.96 2009-10-05 09:21:54 cg Exp $' |
|
853 ! |
|
854 |
|
855 version_CVS |
|
856 ^ '$Header: /cvs/stx/stx/libwidg/TextCollector.st,v 1.96 2009-10-05 09:21:54 cg Exp $' |
854 ! ! |
857 ! ! |
855 |
858 |
856 TextCollector initialize! |
859 TextCollector initialize! |