--- a/ListView.st	Tue Feb 10 10:33:12 2004 +0100
+++ b/ListView.st	Tue Feb 10 18:05:35 2004 +0100
@@ -1155,9 +1155,7 @@
 
     (startLine == endLine) ifTrue:[
         "part of a line"
-        ^ StringCollection with:(self listAt:startLine
-                                        from:startCol
-                                          to:endCol)
+        ^ StringCollection with:(self listAt:startLine from:startCol to:endCol)
     ].
     sz := endLine - startLine + 1.
     sz < 1 ifTrue:[^ nil].
@@ -1219,24 +1217,6 @@
     ].
 
     "Modified: / 26.7.1998 / 13:00:14 / cg"
-!
-
-xxxaddAll:aCollectionOfLines beforeIndex:index
-    "add a line and redisplay"
-
-    list isNil ifTrue:[list := OrderedCollection new].
-    aCollectionOfLines do:[:eachLine |
-	list addAll:aCollectionOfLines beforeIndex:index.
-    ].
-
-    widthOfWidestLine := nil. "/ i.e. unknown
-    self textChanged.
-
-    ((index-1) <= self lastLineShown) ifTrue:[
-	self redrawFromLine:index-1.
-    ].
-
-    self contentsChanged.             "recompute scrollbars"
 ! !
 
 !ListView methodsFor:'accessing-look'!
@@ -4454,5 +4434,5 @@
 !ListView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.286 2003-10-02 10:18:16 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.287 2004-02-10 17:05:35 cg Exp $'
 ! !