--- a/EditTextView.st	Wed Sep 27 15:48:34 2017 +0200
+++ b/EditTextView.st	Wed Sep 27 15:49:52 2017 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
               All Rights Reserved
@@ -2141,17 +2139,19 @@
     |l|
 
     self st80EditMode ifTrue:[
-        l := (self listAt:cursorLine).
-        cursorCol >= (l size + 1) ifTrue:[
-            cursorLine <= list size ifTrue:[
-                self cursorReturn:false. "/ no autoindent
-            ].
-            ^ self
-        ]
+        self isInputField ifFalse:[
+            l := (self listAt:cursorLine).
+            cursorCol >= (l size + 1) ifTrue:[
+                cursorLine <= list size ifTrue:[
+                    self cursorReturn:false. "/ no autoindent
+                ].
+                ^ self
+            ]
+        ].
     ].
     self cursorCol:(cursorCol + 1)
 
-    "Modified: / 20.6.1998 / 18:19:07 / cg"
+    "Modified: / 27-09-2017 / 15:38:26 / cg"
 !
 
 cursorRight:n