--- a/EnterBox2.st	Thu Mar 07 13:24:44 1996 +0100
+++ b/EnterBox2.st	Thu Mar 07 13:38:02 1996 +0100
@@ -69,7 +69,7 @@
 !
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/EnterBox2.st,v 1.14 1996-02-11 09:54:43 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EnterBox2.st,v 1.15 1996-03-07 12:36:37 cg Exp $'
 ! !
 
 !EnterBox2 methodsFor:'accessing'!
@@ -138,10 +138,14 @@
 keyPress:aKey x:x y:y
     "return-key dublicates ok-function if acceptReturnAsOK is true"
 
+    <resource: #keyboard (#Return)>
+
     acceptReturnAsOK ifTrue:[
-	(aKey == #Return) ifTrue:[^ self ok2Pressed]
+        (aKey == #Return) ifTrue:[^ self ok2Pressed]
     ].
     super keyPress:aKey x:x y:y
+
+    "Modified: 7.3.1996 / 13:16:37 / cg"
 !
 
 ok2Pressed