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 |
|
13 'From Smalltalk/X, Version:2.10.6 on 4-aug-1995 at 1:24:43 am' ! |
|
14 |
12 |
15 ButtonController subclass:#PopUpListController |
13 ButtonController subclass:#PopUpListController |
16 instanceVariableNames:'' |
14 instanceVariableNames:'' |
17 classVariableNames:'' |
15 classVariableNames:'' |
18 poolDictionaries:'' |
16 poolDictionaries:'' |
33 other person. No title to or ownership of the software is |
31 other person. No title to or ownership of the software is |
34 hereby transferred. |
32 hereby transferred. |
35 " |
33 " |
36 ! |
34 ! |
37 |
35 |
38 version |
|
39 ^ '$Header: /cvs/stx/stx/libwidg/PopUpListController.st,v 1.3 1995-11-11 16:22:08 cg Exp $' |
|
40 ! |
|
41 |
|
42 documentation |
36 documentation |
43 " |
37 " |
44 redefined the behavior on various keys if my view has the focus. |
38 redefined the behavior on various keys if my view has the focus. |
45 " |
39 " |
|
40 ! |
|
41 |
|
42 version |
|
43 ^ '$Header: /cvs/stx/stx/libwidg/PopUpListController.st,v 1.4 1995-11-23 10:39:59 cg Exp $' |
46 ! ! |
44 ! ! |
47 |
45 |
48 !PopUpListController methodsFor:'event handling'! |
46 !PopUpListController methodsFor:'event handling'! |
49 |
47 |
50 keyPress:key x:x y:y |
48 keyPress:key x:x y:y |
75 ^ self. |
73 ^ self. |
76 ] |
74 ] |
77 ]. |
75 ]. |
78 view keyPress:key x:x y:y |
76 view keyPress:key x:x y:y |
79 ! ! |
77 ! ! |
|
78 |