ListView.st
changeset 5759 df4a9cdcf3b7
parent 5756 8bf39c14ecda
child 5760 9a0b5601b3f4
child 5780 cf2d9f737b92
--- a/ListView.st	Wed May 18 10:17:57 2016 +0200
+++ b/ListView.st	Thu May 19 02:49:11 2016 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
@@ -4925,6 +4927,9 @@
                 
             (match and:[regexMatch]) ifTrue:[
                 "perform a findMatchString (regex matching)"
+                Regex::RxParser isNil ifTrue:[
+                    Smalltalk loadPackage:'stx:goodies/regex'
+                ].
                 matcher := ignCase ifTrue:[pattern asRegexIgnoringCase] ifFalse:[pattern asRegex]. 
                 runner 
                     value:[:lnr :col :lineString |