--- a/ListView.st	Wed Apr 10 08:17:45 1996 +0200
+++ b/ListView.st	Wed Apr 10 16:12:09 1996 +0200
@@ -2742,7 +2742,7 @@
                         "/ first a crude check ...
                         (p match:lineString) ifTrue:[
                             "/ ok, there it is; look at which position
-                            col := lineString findMatchString:realPattern startingAt:col ignoreCase:false ifAbsent:[0].
+                            col := lineString findMatchString:realPattern startingAt:col ignoreCase:false ifAbsent:0.
                             col ~~ 0 ifTrue:[
                                 ^ block1 value:lnr value:col.
                             ]
@@ -2754,7 +2754,7 @@
                 line1 to:line2 do:[:lnr |
                     lineString := list at:lnr.
                     lineString isString ifTrue:[
-                        col := lineString findString:pattern startingAt:col ifAbsent:[0].
+                        col := lineString findString:pattern startingAt:col ifAbsent:0.
                         col ~~ 0 ifTrue:[
                             ^ block1 value:lnr value:col.
                         ]
@@ -2964,5 +2964,5 @@
 !ListView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.74 1996-03-07 18:46:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.75 1996-04-10 14:12:09 cg Exp $'
 ! !