--- a/ListView.st Tue May 30 17:51:08 2017 +0200
+++ b/ListView.st Tue May 30 17:52:48 2017 +0200
@@ -4118,19 +4118,20 @@
!
makeVisible:someString
- "if nescessary, scroll to make the (first)
+ "if necessary, scroll to make the (first)
line containing someString visible."
|index list|
(list := self list) notNil ifTrue:[
- index := list indexOf:someString.
- index ~~ 0 ifTrue:[
- self makeLineVisible:index
- ]
+ index := list indexOf:someString.
+ index ~~ 0 ifTrue:[
+ self makeLineVisible:index
+ ]
]
- "Modified: 9.9.1997 / 10:10:13 / cg"
+ "Modified: / 09-09-1997 / 10:10:13 / cg"
+ "Modified (comment): / 30-05-2017 / 17:34:32 / mawalch"
!
needScrollToMakeLine:aListLineNr