KeyboardProcessor.st
changeset 1146 4ae177ac1fd3
parent 1135 ee997fc311e2
child 1160 4bd4457b1d90
--- a/KeyboardProcessor.st	Thu Mar 18 15:46:19 1999 +0100
+++ b/KeyboardProcessor.st	Thu Mar 18 18:17:14 1999 +0100
@@ -133,7 +133,7 @@
         app := topView application.
 
         topView isModal ifTrue:[
-            topView windowGroup focusView isNil ifTrue:[
+            topView windowGroup explicitFocusView isNil ifTrue:[
                 (returnIsOKInDialog and:[key == #Return]) ifTrue:[
                     self requestGlobalAutoAccept ifFalse:[^ true].
                     app doAccept.
@@ -199,5 +199,5 @@
 !KeyboardProcessor class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/KeyboardProcessor.st,v 1.6 1999-03-11 01:32:37 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/KeyboardProcessor.st,v 1.7 1999-03-18 17:17:14 cg Exp $'
 ! !