SmallSense__CompletionController.st
changeset 187 7baeeea7d8ae
parent 185 75738108cc3f
child 188 cfd4d30fcad7
--- a/SmallSense__CompletionController.st	Tue Apr 01 18:01:57 2014 +0200
+++ b/SmallSense__CompletionController.st	Wed Apr 02 23:42:42 2014 +0200
@@ -231,10 +231,11 @@
      the complection window should be closed or false
      if it shall be kept open."
 
-    | matches word |
+    | prefix matcher matches |
 
-    word := support wordBeforeCursor.
-    matches := completionView list select:[:po | po stringToComplete startsWith: word ].
+    matcher := CompletionEngine matcher.
+    prefix := support wordBeforeCursor.
+    matches := completionView list select:[:po | matcher value: prefix value: po stringToComplete ].
     matches notEmptyOrNil ifTrue:[
         matches size == 1 ifTrue:[
             completionView selection:  matches anElement.
@@ -258,7 +259,7 @@
     ^ false.
 
     "Created: / 27-09-2013 / 16:16:18 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified (format): / 18-01-2014 / 23:24:59 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 02-04-2014 / 23:32:46 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !CompletionController methodsFor:'private-API'!