--- a/ButtonController.st	Tue May 28 22:05:47 1996 +0200
+++ b/ButtonController.st	Tue May 28 22:11:10 1996 +0200
@@ -479,22 +479,24 @@
 
     entered := true.
     enableChannel value ifTrue:[
-	pressed ifTrue:[
-	    "
-	     reentered after a leave with mouse-button down;
-	     restart autorepeating and/or if I am a button with
-	     triggerOnDown, show active again.
-	    "
-	    autoRepeat ifTrue:[
-		Processor addTimedBlock:repeatBlock afterSeconds:initialDelay
-	    ].
-	    isTriggerOnDown ifFalse:[
-		view showActive.
-	    ]
-	] ifFalse:[
-	    view redraw
-	]
+        pressed ifTrue:[
+            "
+             reentered after a leave with mouse-button down;
+             restart autorepeating and/or if I am a button with
+             triggerOnDown, show active again.
+            "
+            autoRepeat ifTrue:[
+                Processor addTimedBlock:repeatBlock afterSeconds:initialDelay
+            ].
+            isTriggerOnDown ifFalse:[
+                view showActive.
+            ]
+        ] ifFalse:[
+            view invalidate
+        ]
     ]
+
+    "Modified: 26.5.1996 / 18:09:06 / cg"
 !
 
 pointerLeave:state
@@ -503,22 +505,24 @@
 
     entered := false.
     pressed ifTrue:[
-	"
-	 leave with mouse-button down;
-	 stop autorepeating and/or if I am a button with
-	 action on release, show passive
-	"
-	autoRepeat ifTrue:[
-	    Processor removeTimedBlock:repeatBlock
-	].
-	isTriggerOnDown ifFalse:[
-	    view showPassive.
-	]
+        "
+         leave with mouse-button down;
+         stop autorepeating and/or if I am a button with
+         action on release, show passive
+        "
+        autoRepeat ifTrue:[
+            Processor removeTimedBlock:repeatBlock
+        ].
+        isTriggerOnDown ifFalse:[
+            view showPassive.
+        ]
     ] ifFalse:[
-	enableChannel value ifTrue:[
-	    view redraw
-	]
+        enableChannel value ifTrue:[
+            view invalidate
+        ]
     ]
+
+    "Modified: 26.5.1996 / 18:09:08 / cg"
 !
 
 repeat
@@ -573,5 +577,5 @@
 !ButtonController class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ButtonController.st,v 1.33 1996-05-28 18:32:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ButtonController.st,v 1.34 1996-05-28 20:11:10 cg Exp $'
 ! !