--- a/SmallSense__CompletionController.st	Wed Mar 04 09:51:20 2015 +0000
+++ b/SmallSense__CompletionController.st	Wed Mar 04 06:01:34 2015 +0000
@@ -354,10 +354,11 @@
     matches1 := list select:[:po | matcher1 value: prefix value: po stringToComplete ].
     matches1 notEmptyOrNil ifTrue:[
         matches1 size == 1 ifTrue:[
-            | selection |
+            | selection completeElectric |
 
             selection := matches1 anElement.
-            (completeIfUnambiguous and: [(editView sensor hasKeyEventFor:editView) not]) ifTrue:[
+            completeElectric := completeIfUnambiguous and:[ support electricInsertSuppressed not ].
+            (completeElectric and: [(editView sensor hasKeyEventFor:editView) not]) ifTrue:[
                 self complete: selection afterKeyPress: keyOrNil.
                 ^ true
             ] ifFalse:[ 
@@ -396,7 +397,7 @@
     ^ false.
 
     "Created: / 17-06-2014 / 07:19:19 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 11-08-2014 / 14:52:23 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 03-03-2015 / 17:15:23 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !CompletionController methodsFor:'private-API'!