class: CheckLabel
authorClaus Gittinger <cg@exept.de>
Tue, 02 Dec 2014 19:19:38 +0100
changeset 5205 d5b7f2176621
parent 5204 b14a2b4cfc23
child 5206 d3ea9cf507fb
class: CheckLabel changed: #drawWith:and:
CheckLabel.st
--- a/CheckLabel.st	Tue Dec 02 19:18:58 2014 +0100
+++ b/CheckLabel.st	Tue Dec 02 19:19:38 2014 +0100
@@ -68,13 +68,7 @@
 
 drawWith:fg and:bg
     super drawWith:fg and:bg.
-    hasFocus == true ifTrue:[
-        (styleSheet at:#focusHighlightStyle) == #win95 ifTrue:[
-            self windowGroup focusCameByTab ifTrue:[
-                self drawWin95FocusFrame
-            ]
-        ]
-    ].
+    hasFocus == true ifTrue:[ self drawFocusFrame ].
 
     "Created: / 17.9.1998 / 14:16:07 / cg"
     "Modified: / 17.9.1998 / 14:17:40 / cg"
@@ -83,5 +77,6 @@
 !CheckLabel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/CheckLabel.st,v 1.4 2008-07-22 20:50:05 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/CheckLabel.st,v 1.5 2014-12-02 18:19:38 cg Exp $'
 ! !
+