equal
deleted
inserted
replaced
7 inclusion of the above copyright notice. This software may not |
7 inclusion of the above copyright notice. This software may not |
8 be provided or otherwise made available to, or used by, any |
8 be provided or otherwise made available to, or used by, any |
9 other person. No title to or ownership of the software is |
9 other person. No title to or ownership of the software is |
10 hereby transferred. |
10 hereby transferred. |
11 " |
11 " |
|
12 "{ Package: 'stx:libwidg' }" |
12 |
13 |
13 "{ Package: 'stx:libwidg' }" |
14 "{ NameSpace: Smalltalk }" |
14 |
15 |
15 ToggleController subclass:#RadioButtonController |
16 ToggleController subclass:#RadioButtonController |
16 instanceVariableNames:'' |
17 instanceVariableNames:'' |
17 classVariableNames:'' |
18 classVariableNames:'' |
18 poolDictionaries:'' |
19 poolDictionaries:'' |
53 ! ! |
54 ! ! |
54 |
55 |
55 !RadioButtonController methodsFor:'initialization & release'! |
56 !RadioButtonController methodsFor:'initialization & release'! |
56 |
57 |
57 initialize |
58 initialize |
|
59 <modifier: #super> "must be called if redefined" |
|
60 |
58 super initialize. |
61 super initialize. |
59 isToggle := false. |
62 isToggle := false. |
60 isRadio := true. |
63 isRadio := true. |
61 isTriggerOnDown := true. |
64 isTriggerOnDown := true. |
62 |
65 |
63 "Created: 15.7.1996 / 13:43:23 / cg" |
66 "Created: / 15-07-1996 / 13:43:23 / cg" |
|
67 "Modified: / 08-02-2017 / 00:34:42 / cg" |
64 ! ! |
68 ! ! |
65 |
69 |
66 !RadioButtonController class methodsFor:'documentation'! |
70 !RadioButtonController class methodsFor:'documentation'! |
67 |
71 |
68 version |
72 version |
69 ^ '$Header: /cvs/stx/stx/libwidg/RadioButtonController.st,v 1.9 2003-05-07 14:56:15 cg Exp $' |
73 ^ '$Header$' |
70 ! ! |
74 ! ! |
|
75 |