--- a/TextView.st	Mon Oct 12 13:39:09 2009 +0200
+++ b/TextView.st	Mon Oct 12 13:41:13 2009 +0200
@@ -2025,12 +2025,15 @@
 
     patternHolder := '' asValue.
 
+    self setSearchPatternWithMatchEscapes: match.
+
     lastSearchPattern notNil ifTrue:[
         initialString := lastSearchPattern.
     ].
-    self hasSelectionWithinSingleLine ifTrue:[
-        initialString := self selection asString.
-    ].
+"/  No longer force the current selection to be the initialString
+"/    self hasSelectionWithinSingleLine ifTrue:[
+"/        initialString := self selection asString.
+"/    ].
     initialString isNil ifTrue:[
         LastSearchPatterns size > 0 ifTrue:[
             initialString := LastSearchPatterns first.
@@ -4287,11 +4290,11 @@
 !TextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.304 2009-10-12 08:35:24 fm Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.305 2009-10-12 11:41:13 fm Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.304 2009-10-12 08:35:24 fm Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.305 2009-10-12 11:41:13 fm Exp $'
 ! !
 
 TextView initialize!