branch | cvs_MAIN |
changeset 1103 | b1be38cd7002 |
parent 950 | 105d05210aa3 |
--- a/SmallSense__ParseTreeInspector.st Fri Aug 30 10:42:28 2019 +0200 +++ b/SmallSense__ParseTreeInspector.st Fri Aug 30 10:55:46 2019 +0200 @@ -1,3 +1,5 @@ +"{ Encoding: utf8 }" + " stx:goodies/smallsense - A productivity plugin for Smalltalk/X IDE Copyright (C) 2013-2014 Jan Vrany @@ -733,7 +735,7 @@ with: optionalSelector. (start isNil or:[ stop isNil ]) ifTrue:[ - label := label withColor: Color red. + label := label allRed. ]. ^ label