--- a/ButtonController.st	Mon Apr 05 15:50:55 2004 +0200
+++ b/ButtonController.st	Wed Apr 07 10:32:20 2004 +0200
@@ -478,7 +478,9 @@
             ].
 
             self performAction.
-            view flush.
+            view notNil ifTrue:[
+                view flush.
+            ].
 
             autoRepeat ifTrue:[
                 Processor addTimedBlock:repeatBlock afterSeconds:initialDelay
@@ -786,5 +788,5 @@
 !ButtonController class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ButtonController.st,v 1.67 2004-02-12 12:10:38 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ButtonController.st,v 1.68 2004-04-07 08:32:20 werner Exp $'
 ! !