--- a/RegressionTests__Widgets.st	Thu Mar 28 09:36:10 2019 +0100
+++ b/RegressionTests__Widgets.st	Thu Mar 28 09:42:43 2019 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "{ Package: 'stx:goodies/regression' }"
 
 "{ NameSpace: RegressionTests }"
@@ -53,13 +55,14 @@
 
     editWidget cursorLine:2 col:20.
     rslt := editWidget lineStringBeforeCursor.
-    self assert:(rslt = 'line2').
+    self assert:(rslt = 'line2              ').           "/ lineStringBeforCursor pads to col with blanks
 
     "
      self new test10_editTextView
     "
 
     "Created: / 21-03-2019 / 13:02:23 / Claus Gittinger"
+    "Modified (comment): / 27-03-2019 / 15:34:04 / stefan"
 ! !
 
 !Widgets class methodsFor:'documentation'!