.
--- a/CheckBox.st Wed May 17 14:49:25 1995 +0200
+++ b/CheckBox.st Thu May 18 17:52:01 1995 +0200
@@ -24,7 +24,7 @@
version
"
-$Header: /cvs/stx/stx/libwidg2/CheckBox.st,v 1.5 1995-05-17 12:48:38 claus Exp $
+$Header: /cvs/stx/stx/libwidg2/CheckBox.st,v 1.6 1995-05-18 15:52:01 claus Exp $
"
!
@@ -114,7 +114,7 @@
b := CheckBox new.
b label:'check'.
- b model:model; change:#changeCheck:.
+ b model:model; changeMessage:#changeCheck:.
b open.
@@ -172,11 +172,11 @@
b := CheckBox in:panel.
b label:'check1'.
- b model:model; aspect:#value1; change:#value1:.
+ b model:model; aspect:#value1; changeMessage:#value1:.
b := CheckBox in:panel.
b label:'check2'.
- b model:model; aspect:#value2; change:#value2:.
+ b model:model; aspect:#value2; changeMessage:#value2:.
top addComponent:panel.
top addAbortButton; addOkButton.