--- a/ListView.st	Mon Dec 04 18:58:28 2000 +0100
+++ b/ListView.st	Wed Dec 06 13:27:11 2000 +0100
@@ -567,6 +567,20 @@
 
 !ListView methodsFor:'accessing-behavior'!
 
+scrollWhenUpdating
+    "return the scroll behavior, when I get a new text 
+     (via the model or the #contents/#list)
+     Possible returnValues are:
+        #keep / nil     -> no change
+        #endOfText      -> scroll to the end
+        #beginOfText    -> scroll to the top
+     The default is #beginOfText.
+     This may be useful for fields which get new values assigned from
+     the program (i.e. not from the user)"
+
+    ^ scrollWhenUpdating
+!
+
 scrollWhenUpdating:aSymbolOrNil
     "define how to scroll, when I get a new text 
      (via the model or the #contents/#list)
@@ -4272,5 +4286,5 @@
 !ListView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.245 2000-11-24 10:47:13 martin Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.246 2000-12-06 12:27:11 cg Exp $'
 ! !