EditTextView.st
changeset 5833 584a6e4d283a
parent 5826 28864f883d37
child 5834 60d6d5a839d3
child 5838 940ce0413cb2
--- a/EditTextView.st	Thu Aug 18 16:09:32 2016 +0200
+++ b/EditTextView.st	Tue Aug 23 18:16:30 2016 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
@@ -5883,17 +5881,17 @@
     line1 := self selectionStartLine.
     line2 := self selectionEndLine.
     line1 isNil ifTrue:[
-	line1 := self cursorLine.
-	line1 notNil ifTrue:[
-	    line2 := line1+1
-	]
+        line1 := self cursorLine.
+        line1 notNil ifTrue:[
+            line2 := line1
+        ]
     ] ifFalse:[
-	line2 notNil ifTrue:[
-	    self selectionEndCol == 0 ifTrue:[ line2 := line2 - 1 ].
-	].
+        line2 notNil ifTrue:[
+            self selectionEndCol == 0 ifTrue:[ line2 := line2 - 1 ].
+        ].
     ].
     line1 notNil ifTrue:[
-	self indentFromLine:line1 toLine:line2 by:n.
+        self indentFromLine:line1 toLine:line2 by:n.
     ]
 !