--- a/EditTextView.st	Fri Feb 21 19:14:53 2020 +0100
+++ b/EditTextView.st	Sat Feb 22 10:06:05 2020 +0100
@@ -1019,12 +1019,16 @@
 !
 
 autoIndent
+    "true if autoIndent mode is on"
+
     ^ autoIndent value
 
     "Modified: / 26-06-2019 / 23:16:17 / Claus Gittinger"
 !
 
 autoIndent:aBoolean
+    "set to true for autoIndent mode"
+    
     autoIndent value: aBoolean
 
     "Created: / 05-03-1996 / 14:37:50 / cg"
@@ -1032,6 +1036,8 @@
 !
 
 autoIndentHolder
+    "holds true if autoIndent mode is on"
+    
     ^ autoIndent
 
     "Created: / 26-06-2019 / 23:16:24 / Claus Gittinger"
@@ -1095,18 +1101,26 @@
 !
 
 editModeHolder
+    "the edit mode (insert, overwrite,...)"
+
     ^ editMode.
 !
 
 editModeInsert
+    "set to insert mode"
+
     editMode value:EditMode insertMode
 !
 
 editModeInsertAndSelect
+    "set to selecting insert mode"
+
     editMode value:EditMode insertAndSelectMode
 !
 
 editModeOverwrite
+    "set to overwrite mode"
+
     editMode value:EditMode overwriteMode
 !
 
@@ -1152,12 +1166,16 @@
 !
 
 insertMode:aBoolean
+    "set to true if inserting (as opposed to overwrite)"
+
     editMode value:(aBoolean ifTrue:[EditMode insertMode] ifFalse:[EditMode overwriteMode])
 
     "Created: 6.3.1996 / 12:24:05 / cg"
 !
 
 insertModeHolder
+    "holds true if inserting (as opposed to overwrite)"
+
     ^ BlockValue
         with:[:m | m isInsertMode]
         argument:(editMode).
@@ -1166,6 +1184,8 @@
 !
 
 isInInsertMode
+    "true if inserting (as opposed to overwrite)"
+    
     ^ editMode value isInsertMode
 !