--- a/ListView.st Sat Aug 31 21:29:52 2013 +0200
+++ b/ListView.st Sat Aug 31 21:30:56 2013 +0200
@@ -4526,12 +4526,12 @@
lineString := lineString asString string.
lineString isString ifTrue:[
"/ first a crude check ...
- (p match:lineString ignoreCase:ignCase) ifTrue:[
+ (p match:lineString caseSensitive:ignCase not) ifTrue:[
"/ ok, there it is; look at which position
col := lineString
findMatchString:realPattern
startingAt:col
- ignoreCase:ignCase
+ caseSensitive:ignCase not
ifAbsent:0.
col ~~ 0 ifTrue:[
^ block1 value:lnr value:col.
@@ -4930,10 +4930,10 @@
!ListView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.375 2013-08-30 19:47:15 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.376 2013-08-31 19:30:56 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.375 2013-08-30 19:47:15 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.376 2013-08-31 19:30:56 cg Exp $'
! !