checkin from browser
authorClaus Gittinger <cg@exept.de>
Mon, 15 Feb 1999 13:39:53 +0100
changeset 1739 3cb6e85d42c0
parent 1738 e9ae670797f0
child 1740 0160c5afae9c
checkin from browser
Button.st
ButtonC.st
ButtonController.st
--- a/Button.st	Mon Feb 15 13:38:16 1999 +0100
+++ b/Button.st	Mon Feb 15 13:39:53 1999 +0100
@@ -1833,8 +1833,7 @@
 reinitialize
     super reinitialize.
     controller notNil ifTrue:[
-	controller active:false.
-	controller entered:false.
+        controller reinitialize.
     ]
 ! !
 
@@ -2230,5 +2229,5 @@
 !Button class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Button.st,v 1.101 1998-11-19 12:04:01 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Button.st,v 1.102 1999-02-15 12:39:53 cg Exp $'
 ! !
--- a/ButtonC.st	Mon Feb 15 13:38:16 1999 +0100
+++ b/ButtonC.st	Mon Feb 15 13:39:53 1999 +0100
@@ -683,6 +683,12 @@
     "Modified: / 21.5.1998 / 03:07:02 / cg"
 !
 
+reinitialize
+    active := false.
+    pressed := false.
+    entered := false.
+!
+
 release
     "release all dependencies"
 
@@ -696,5 +702,5 @@
 !ButtonController class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Attic/ButtonC.st,v 1.53 1998-10-26 20:13:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/ButtonC.st,v 1.54 1999-02-15 12:39:40 cg Exp $'
 ! !
--- a/ButtonController.st	Mon Feb 15 13:38:16 1999 +0100
+++ b/ButtonController.st	Mon Feb 15 13:39:53 1999 +0100
@@ -683,6 +683,12 @@
     "Modified: / 21.5.1998 / 03:07:02 / cg"
 !
 
+reinitialize
+    active := false.
+    pressed := false.
+    entered := false.
+!
+
 release
     "release all dependencies"
 
@@ -696,5 +702,5 @@
 !ButtonController class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ButtonController.st,v 1.53 1998-10-26 20:13:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ButtonController.st,v 1.54 1999-02-15 12:39:40 cg Exp $'
 ! !