EditFieldWithCompletion.st
branchjv
changeset 12214 4b7eedbab2a7
parent 12128 a7ff7d66ee85
child 12221 413e98858ddc
--- a/EditFieldWithCompletion.st	Fri Mar 30 14:35:31 2012 +0100
+++ b/EditFieldWithCompletion.st	Sat Mar 31 01:16:30 2012 +0100
@@ -247,7 +247,7 @@
     key = #Escape ifTrue:[self hideOptionsWindow].
     key = #BackSpace ifTrue:
         [super 
-            keyPress:#Delete x:x y:y;
+"/            keyPress:#Delete x:x y:y;
             keyPress:#BackSpace x:x y:y.
         ^ self startCompletion].
 
@@ -260,7 +260,7 @@
 
     "Created: / 08-08-2009 / 22:02:13 / Jan Vrany <vranyj1@fel.cvut.cz>"
     "Modified: / 09-08-2009 / 14:06:43 / Jan Vrany <vranyj1@fel.cvut.cz>"
-    "Modified: / 09-02-2010 / 20:47:59 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 30-03-2012 / 17:34:40 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 keyPress:key x:x y:y view:aView
@@ -403,5 +403,5 @@
 !
 
 version_SVN
-    ^ '$Id: EditFieldWithCompletion.st 7854 2012-01-30 17:49:41Z vranyj1 $'
+    ^ '$Id: EditFieldWithCompletion.st 7961 2012-03-31 00:16:30Z vranyj1 $'
 ! !