--- a/SmallSense__SmalltalkEditSupport.st	Wed Feb 11 22:38:49 2015 +0000
+++ b/SmallSense__SmalltalkEditSupport.st	Thu Feb 12 00:30:40 2015 +0000
@@ -185,11 +185,11 @@
     lastToken0 = 'Error' ifTrue:[
         ^ false
     ].
-    (tokens last > service textView cursorCol) ifTrue:[
+    (tokens last > textView cursorCol) ifTrue:[
         ^ false
     ].
     ((lastToken0 == #Identifier)
-        and:[ (service textView cursorCol - 1) == tokens last ])
+        and:[ (textView cursorCol - 1) == tokens last ])
             ifTrue:[
                 lastValue0 := tokens at:tokens size - 2.
                 tokens size > 4 ifTrue:[
@@ -225,7 +225,7 @@
     ^ false.
 
     "Created: / 22-10-2013 / 03:05:35 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 22-10-2013 / 12:00:14 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 12-02-2015 / 00:02:29 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 electricInsertSnippetAfterSpace
@@ -239,7 +239,7 @@
     lastToken0 = 'Error' ifTrue:[
         ^ false
     ].
-    (tokens last > service textView cursorCol) ifTrue:[
+    (tokens last > textView cursorCol) ifTrue:[
         ^ false
     ].
     lastToken0 == #Keyword ifTrue:[
@@ -270,7 +270,7 @@
     ^ false.
 
     "Created: / 22-10-2013 / 03:00:36 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 23-05-2014 / 11:28:19 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 12-02-2015 / 00:02:41 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !SmalltalkEditSupport methodsFor:'event handling'!
@@ -557,10 +557,10 @@
 
 initializeForService: anEditService
     super initializeForService: anEditService.
-    service textView autoIndent:true.
+    anEditService textView autoIndent:true.
 
     "Created: / 27-09-2013 / 13:22:48 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 03-10-2013 / 17:44:06 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 11-02-2015 / 23:59:52 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !SmalltalkEditSupport methodsFor:'private'!
@@ -568,7 +568,7 @@
 tokensAtCursorLine
     | line scanner token |
 
-    line := (service textView listAt: service textView cursorLine) string.
+    line := (textView listAt: textView cursorLine) string.
     line := line copyTo: textView cursorCol - 1.
     line isEmpty ifTrue:[ ^ #() ].
     scanner := Scanner for: line.
@@ -579,7 +579,7 @@
     ].
 
     "Created: / 25-07-2013 / 00:07:27 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 22-01-2014 / 21:41:49 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 12-02-2015 / 00:02:54 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !SmalltalkEditSupport class methodsFor:'documentation'!