--- a/ReadEvalPrintLoop.st Sun Feb 23 11:37:36 2020 +0100
+++ b/ReadEvalPrintLoop.st Sun Feb 23 13:23:41 2020 +0100
@@ -828,15 +828,11 @@
]) ifFalse:[^ self].
selector isNil ifTrue:[
- stderr nextPutAll:(class definition); cr.
- stderr nextPutAll:(class commentOrDocumentationString); cr.
+ stderr nextPutLine:(class definition).
+ stderr nextPutLine:(class commentOrDocumentationString).
] ifFalse:[
source := class sourceCodeAt:selector asSymbol.
- source isEmptyOrNil ifTrue:[
- stderr nextPutLine:'Sorry, no sourcecode found'
- ] ifFalse:[
- stderr nextPutAll:source; cr
- ].
+ stderr nextPutLine:(source isEmptyOrNil ifTrue:['Sorry, no sourcecode found'] ifFalse:[source])
].
"