SmallSense__ParseTreeInspector.st
branchcvs_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