#BUGFIX by cg
authorClaus Gittinger <cg@exept.de>
Mon, 04 Dec 2017 17:51:27 +0100
changeset 17834 502804e4188b
parent 17833 142fc607f04c
child 17835 66aa1d38b37a
#BUGFIX by cg class: DebugView changed: #setLabelFor:in: uninitialized variable
DebugView.st
--- a/DebugView.st	Fri Dec 01 17:53:49 2017 +0100
+++ b/DebugView.st	Mon Dec 04 17:51:27 2017 +0100
@@ -3878,7 +3878,7 @@
     ].
 
     exceptionInfoLabel notNil ifTrue:[
-        colorUsed := isStoppedAtHaltOrBreakPoint 
+        colorUsed := (isStoppedAtHaltOrBreakPoint == true) 
                         ifTrue:[ Color orange ]
                         ifFalse:[ Color red ].
         colorUsed := colorUsed contrastingColorFor:exceptionInfoLabel backgroundColor.                
@@ -3896,7 +3896,7 @@
                           ,(lines asStringWith:Character cr)).
     ].
 
-    "Modified: / 13-07-2017 / 15:00:36 / cg"
+    "Modified: / 03-12-2017 / 15:09:55 / cg"
 ! !
 
 !DebugView methodsFor:'interrupt handling'!