--- a/ListView.st	Tue Oct 07 16:21:45 1997 +0200
+++ b/ListView.st	Tue Oct 07 16:22:49 1997 +0200
@@ -10,8 +10,6 @@
  hereby transferred.
 "
 
-'From Smalltalk/X, Version:3.1.9 on 13-sep-1997 at 7:15:47 pm'                  !
-
 View subclass:#ListView
 	instanceVariableNames:'list firstLineShown leftOffset nFullLinesShown nLinesShown
 		fgColor bgColor partialLines leftMargin topMargin textStartLeft
@@ -3407,7 +3405,7 @@
                     col == -999 ifTrue:[col := lineSize - patternSize + 1].
                     [(col > 0) 
                      and:[(c := lineString at:col) ~= firstChar1
-                     and:[c ~~ firstChar2]]] whileTrue:[
+                     and:[c ~= firstChar2]]] whileTrue:[
                         col := col - 1
                     ].
                     [col > 0] whileTrue:[
@@ -3447,7 +3445,7 @@
     ^ block2 value
 
     "Created: 13.9.1997 / 01:06:19 / cg"
-    "Modified: 13.9.1997 / 07:14:56 / cg"
+    "Modified: 5.10.1997 / 01:53:18 / cg"
 !
 
 searchBackwardFor:pattern startingAtLine:startLine col:startCol ifFound:block1 ifAbsent:block2
@@ -3755,5 +3753,5 @@
 !ListView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.141 1997-09-15 20:32:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.142 1997-10-07 14:22:49 cg Exp $'
 ! !