Tools__CodeCompletionMenu.st
branchjv
changeset 12401 4714b9640528
parent 12128 a7ff7d66ee85
parent 12107 9aa2298d243a
child 12431 9f0c59c742d5
--- a/Tools__CodeCompletionMenu.st	Tue Jan 22 12:24:41 2013 +0000
+++ b/Tools__CodeCompletionMenu.st	Wed Jan 30 11:15:09 2013 +0000
@@ -65,6 +65,7 @@
 "
 ! !
 
+
 !CodeCompletionMenu class methodsFor:'interface opening'!
 
 openFor: aCodeView at: anInteger with:aCollection
@@ -80,6 +81,7 @@
     "Modified: / 01-07-2011 / 00:05:01 / cg"
 ! !
 
+
 !CodeCompletionMenu methodsFor:'accessing'!
 
 contentHeight
@@ -108,6 +110,7 @@
     "Modified: / 06-03-2010 / 08:17:27 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
+
 !CodeCompletionMenu methodsFor:'event handling'!
 
 backspaceKeyPress
@@ -122,8 +125,8 @@
 !
 
 characterKeyPress:aCharacter
+    | newString |
 
-    | newString |
     newString := typedString , aCharacter.
     (wholeList anySatisfy:[:s|s startsWith:newString]) ifTrue:[
         typedString := newString.
@@ -141,6 +144,7 @@
 !
 
 keyPress:key x:x y:y
+    <resource: #keyboard (#Return #BackSpace #Tab)>
 
     key isCharacter ifTrue:[
         self characterKeyPress:key.
@@ -199,8 +203,8 @@
 !
 
 tabKeyPressX:x y:y
+    | currentList idx char completionString|
 
-    | currentList idx char completionString|
     currentList := self list.
     idx := typedString size + 1.
     [
@@ -219,6 +223,7 @@
     "Created: / 29-05-2005 / 09:50:03 / janfrog"
 ! !
 
+
 !CodeCompletionMenu methodsFor:'initialize'!
 
 initialize
@@ -246,6 +251,7 @@
     "Modified: / 01-07-2011 / 00:08:31 / cg"
 ! !
 
+
 !CodeCompletionMenu methodsFor:'interface opening'!
 
 openModalXX
@@ -288,6 +294,7 @@
     "Modified: / 01-07-2011 / 09:30:29 / cg"
 ! !
 
+
 !CodeCompletionMenu methodsFor:'updating'!
 
 updateList
@@ -298,12 +305,14 @@
     "Modified: / 27-05-2005 / 22:23:37 / janfrog"
 ! !
 
+
 !CodeCompletionMenu class methodsFor:'documentation'!
 
 version_CVS
-    ^ '§Header: /cvs/stx/stx/libtool/Tools__CodeCompletionMenu.st,v 1.3 2011/07/03 17:50:23 cg Exp §'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeCompletionMenu.st,v 1.4 2013-01-17 10:39:42 cg Exp $'
 !
 
 version_SVN
-    ^ '$Id: Tools__CodeCompletionMenu.st 7854 2012-01-30 17:49:41Z vranyj1 $'
-! !
\ No newline at end of file
+    ^ '§Id: Tools__CodeCompletionMenu.st 7690 2011-03-19 02:23:25Z vranyj1 §'
+! !
+