branch | cvs_MAIN |
changeset 950 | 105d05210aa3 |
parent 911 | 60c49fec7270 |
child 1103 | b1be38cd7002 |
--- a/SmallSense__ParseTreeInspector.st Mon May 09 10:07:06 2016 +0200 +++ b/SmallSense__ParseTreeInspector.st Mon May 09 10:09:22 2016 +0200 @@ -733,7 +733,7 @@ with: optionalSelector. (start isNil or:[ stop isNil ]) ifTrue:[ - label := label asText colorizeAllWith: Color red. + label := label withColor: Color red. ]. ^ label