--- a/EditTextView.st	Mon Jun 11 11:21:11 2001 +0200
+++ b/EditTextView.st	Mon Jun 11 11:21:51 2001 +0200
@@ -4917,6 +4917,11 @@
                 ] 
            ifAbsent:
                 [
+                    |sensor|
+
+                    (sensor := self sensor) notNil ifTrue:[
+                        sensor compressKeyPressEventsWithKey:#Again.
+                    ].
                     self showNotFound.
                     selectStyle := savedSelectStyle.
                     ^ false
@@ -4944,5 +4949,5 @@
 !EditTextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.248 2001-05-17 14:45:20 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.249 2001-06-11 09:21:51 cg Exp $'
 ! !