ButtonController.st
changeset 3471 24a5f40ff045
parent 3224 9dd0891a2ff4
child 3555 8e422a2a3488
--- a/ButtonController.st	Thu Mar 15 22:31:17 2007 +0100
+++ b/ButtonController.st	Fri Mar 16 13:30:47 2007 +0100
@@ -9,7 +9,6 @@
  other person.  No title to or ownership of the software is
  hereby transferred.
 "
-
 "{ Package: 'stx:libwidg' }"
 
 Controller subclass:#ButtonController
@@ -674,6 +673,9 @@
      Redraw with normal colors if they differ from enteredColors"
 
     entered := false.
+    "/ sometimes could happen that the view becomes nil
+    view isNil ifTrue:[^ self].
+
     pressed ifTrue:[
         isTriggerOnDown ifFalse:[
             view showPassive.
@@ -790,5 +792,5 @@
 !ButtonController class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ButtonController.st,v 1.69 2005-12-21 11:40:28 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ButtonController.st,v 1.70 2007-03-16 12:30:47 mb Exp $'
 ! !