author | Claus Gittinger <cg@exept.de> |
Mon, 26 Aug 2019 23:19:57 +0200 | |
changeset 6685 | 8649058518e7 |
parent 6684 | 8edd9a35cc20 |
child 6686 | 0e2f231411ff |
TextCollector.st | file | annotate | diff | comparison | revisions |
--- a/TextCollector.st Mon Aug 26 10:10:28 2019 +0200 +++ b/TextCollector.st Mon Aug 26 23:19:57 2019 +0200 @@ -862,7 +862,7 @@ (something isCharacter) ifTrue:[ ((something == Character cr) or:[something == Character nl]) ifTrue:[ self cr. - ^ self. + ^ something. ]. ]. @@ -871,6 +871,7 @@ txt := txt emphasizeAllWith:currentEmphasis ]. self show:txt. + ^ something "/ flushPending ifTrue:[ "/ self endEntry