SmallSense__EditService.st
branchcvs_MAIN
changeset 1111 188b3b126921
parent 966 25bb5ab6275e
child 1112 31c16b6a0759
--- a/SmallSense__EditService.st	Sun Sep 15 18:55:50 2019 +0200
+++ b/SmallSense__EditService.st	Fri Nov 01 13:44:50 2019 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
 stx:goodies/smallsense - A productivity plugin for Smalltalk/X IDE
 Copyright (C) 2013-2014 Jan Vrany
@@ -64,17 +66,17 @@
      | map |
      map := Screen current keyboardMap.
      map bindValue:#CodeCompletion to: #'Ctrl '.
-     map bindValue:#CodeCompletion to: #'Ctrlspace'.
+     map bindValue:#CodeCompletion to: #'CtrlSpace'.
     "
 
     Smalltalk addStartBlock:[
-	Screen current notNil ifTrue:[
-	    | map |
-	    map := Screen current keyboardMap.
-	    (map keyAtValue:#CodeCompletion) isNil ifTrue:[
-		map bindValue:#CodeCompletion to: #'Ctrl '.
-		map bindValue:#CodeCompletion to: #'Ctrlspace'.
-	    ].
+        Screen current notNil ifTrue:[
+            | map |
+            map := Screen current keyboardMap.
+            (map keyAtValue:#CodeCompletion) isNil ifTrue:[
+                map bindValue:#CodeCompletion to: #'Ctrl '.
+                map bindValue:#CodeCompletion to: #'CtrlSpace'.
+            ].
        ]
     ]