#DOCUMENTATION by cg
authorClaus Gittinger <cg@exept.de>
Thu, 01 Mar 2018 10:44:11 +0100
changeset 6289 110928952dac
parent 6288 e20391f994cf
child 6290 9c06dcc35aaa
#DOCUMENTATION by cg class: EditTextView comment/format in: #list:
EditTextView.st
--- a/EditTextView.st	Tue Feb 27 12:01:00 2018 +0100
+++ b/EditTextView.st	Thu Mar 01 10:44:11 2018 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
               All Rights Reserved
@@ -1494,17 +1496,18 @@
     ^ line copyTo:(cursorCol-1)
 !
 
-list:something
+list:newCollectionOfLinesOrNil
     "replace the whole contents by something new.
      this is not undoably, unless you care for yourself.
-     position cursor home when setting contents"
+     Positions the cursor as defined in cursorMovementWhenUpdating
+     (which defaults to: home)"
 
     |prevCursorLine prevCursorCol|
 
     prevCursorLine := cursorLine.
     prevCursorCol := cursorCol.
 
-    super list:something.
+    super list:newCollectionOfLinesOrNil.
 
     (cursorMovementWhenUpdating == #endOfText
     or:[cursorMovementWhenUpdating == #end]) ifTrue:[