--- a/TextView.st	Thu Sep 18 12:01:44 2008 +0200
+++ b/TextView.st	Thu Sep 18 12:03:49 2008 +0200
@@ -2012,14 +2012,14 @@
     patternHolder := '' asValue.
 
     lastSearchPattern notNil ifTrue:[
-        initialString := lastSearchPattern
+        initialString := lastSearchPattern.
     ].
     self hasSelectionWithinSingleLine ifTrue:[
-        initialString := self selection
+        initialString := self selection asString.
     ].
     initialString isNil ifTrue:[
         LastSearchPatterns size > 0 ifTrue:[
-            initialString := LastSearchPatterns first
+            initialString := LastSearchPatterns first.
         ]
     ].
 
@@ -4263,7 +4263,7 @@
 !TextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.289 2008-08-08 16:02:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.290 2008-09-18 10:03:49 stefan Exp $'
 ! !
 
 TextView initialize!