--- a/SmallSense__EditSupport.st Wed Mar 04 09:51:20 2015 +0000
+++ b/SmallSense__EditSupport.st Wed Mar 04 06:01:34 2015 +0000
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
"
stx:goodies/smallsense - A productivity plugin for Smalltalk/X IDE
Copyright (C) 2013-2015 Jan Vrany
@@ -23,7 +25,7 @@
Object subclass:#EditSupport
instanceVariableNames:'textView backspaceIsUndo completionController
completionEnvironment snippets ignoreKeystrokes
- ignoreKeystrokesPosition'
+ ignoreKeystrokesPosition electricInsertSuppressed'
classVariableNames:''
poolDictionaries:''
category:'SmallSense-Core-Services'
@@ -75,6 +77,10 @@
!EditSupport methodsFor:'accessing'!
+electricInsertSuppressed
+ ^ electricInsertSuppressed
+!
+
environment
^ completionEnvironment ? Smalltalk
@@ -369,9 +375,11 @@
initializeForTextView: anEditTextView
textView := anEditTextView.
backspaceIsUndo := false.
+ electricInsertSuppressed := false.
self initializeCompletion.
"Created: / 12-02-2015 / 00:16:31 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 03-03-2015 / 17:14:25 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
!EditSupport methodsFor:'private'!