--- a/ButtonController.st Wed Dec 10 12:12:09 2008 +0100
+++ b/ButtonController.st Wed Dec 17 16:31:45 2008 +0100
@@ -557,9 +557,8 @@
<resource: #keyboard (#Return)>
- view hasFocus ifTrue:[
- ((key == Character space)
- "or:[key == #Return]") ifTrue:[
+ view hasExplicitFocus ifTrue:[
+ ((key == Character space) or:[key == #Return]) ifTrue:[
"just simulate a buttonPress/release here."
self buttonPress:1 x:0 y:0.
self buttonRelease:1 x:0 y:0.
@@ -792,5 +791,5 @@
!ButtonController class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/ButtonController.st,v 1.71 2008-02-15 08:53:49 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/ButtonController.st,v 1.72 2008-12-17 15:31:45 cg Exp $'
! !