--- a/ListView.st	Mon Nov 24 13:48:48 2014 +0000
+++ b/ListView.st	Wed Dec 10 23:48:16 2014 +0000
@@ -37,7 +37,7 @@
 
 Object subclass:#SearchSpec
 	instanceVariableNames:'pattern match ignoreCase variable fullWord forward
-		atBeginOfLineOnly'
+		atBeginOfLineOnly ignoreDiacritics'
 	classVariableNames:''
 	poolDictionaries:''
 	privateIn:ListView
@@ -1952,7 +1952,7 @@
 drawLine:line atX:x inVisible:visLineNr with:fg and:bg
     "draw a given string at visible lines position with
      given x position in fg/bg. Clears the whole line before drawing the string.
-     Low level entry; not meant for public use."
+     This is a low level entry; not meant for public use."
 
     |y l|
 
@@ -5232,6 +5232,14 @@
     ^ ignoreCase ? false
 !
 
+ignoreDiacritics
+    ^ ignoreDiacritics
+!
+
+ignoreDiacritics:something
+    ignoreDiacritics := something.
+!
+
 match
     ^ match ? false
 !
@@ -5302,10 +5310,10 @@
 !ListView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.399 2014-07-12 05:39:50 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.401 2014-12-08 17:31:05 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.399 2014-07-12 05:39:50 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.401 2014-12-08 17:31:05 cg Exp $'
 ! !