PopUpListController.st
changeset 491 7b376aaa06d5
parent 349 e4382398fc59
child 582 e151eeae2c9a
--- a/PopUpListController.st	Thu Mar 07 13:38:02 1996 +0100
+++ b/PopUpListController.st	Thu Mar 07 13:57:36 1996 +0100
@@ -45,7 +45,7 @@
     "pull menu on Return and space, if I am the focusView of my group
      (i.e. if I got an explicit focus)"
 
-    <resource: #keyboard (#CursorUp #CursorDown)>
+    <resource: #keyboard (#Return #CursorUp #CursorDown)>
 
     view hasFocus ifTrue:[
 "/        (key == #Return) ifTrue:[
@@ -72,11 +72,11 @@
     view keyPress:key x:x y:y
 
     "Created: 9.12.1995 / 23:06:09 / cg"
-    "Modified: 9.2.1996 / 23:12:39 / cg"
+    "Modified: 7.3.1996 / 13:17:46 / cg"
 ! !
 
 !PopUpListController class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/PopUpListController.st,v 1.8 1996-02-09 22:13:19 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/PopUpListController.st,v 1.9 1996-03-07 12:57:07 cg Exp $'
 ! !