# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1236191224 -3600
# Node ID da2d1a7a70bfbdbe06c20321f11f740d292c6250
# Parent  93776dd41280b5cd864a36d7de5f6dabde1a9326
invalidate on pointer-enter/leave (vista radioButton)

diff -r 93776dd41280 -r da2d1a7a70bf ButtonController.st
--- a/ButtonController.st	Mon Mar 02 17:19:16 2009 +0100
+++ b/ButtonController.st	Wed Mar 04 19:27:04 2009 +0100
@@ -539,12 +539,11 @@
 
     view notNil ifTrue:[
         view invalidate "redraw".
-
-        enableChannel value ifTrue:[
-            view cursor:Cursor hand
-        ] ifFalse:[
-            view cursor:Cursor normal
-        ].
+        view 
+            cursor:(
+                enableChannel value 
+                    ifTrue:[ Cursor hand ]
+                    ifFalse:[ Cursor normal ])
     ]
 
     "Modified: 17.9.1995 / 19:55:52 / claus"
@@ -659,9 +658,8 @@
             autoRepeat ifTrue:[
                 Processor addTimedBlock:repeatBlock afterSeconds:initialDelay
             ].
-        ] ifFalse:[
-            view invalidate
-        ]
+        ].
+        view invalidate
     ]
 
     "Modified: 26.5.1996 / 18:09:06 / cg"
@@ -690,10 +688,9 @@
         autoRepeat ifTrue:[
             Processor removeTimedBlock:repeatBlock
         ].
-    ] ifFalse:[
-        enableChannel value ifTrue:[
-            view invalidate
-        ]
+    ].
+    enableChannel value ifTrue:[
+        view invalidate
     ]
 
     "Modified: 1.4.1997 / 13:27:32 / cg"
@@ -791,5 +788,5 @@
 !ButtonController class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ButtonController.st,v 1.72 2008-12-17 15:31:45 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ButtonController.st,v 1.73 2009-03-04 18:27:04 cg Exp $'
 ! !