--- a/TextView.st	Tue Apr 13 22:27:15 1999 +0200
+++ b/TextView.st	Wed Apr 14 13:08:47 1999 +0200
@@ -12,10 +12,10 @@
 
 ListView subclass:#TextView
 	instanceVariableNames:'selectionStartLine selectionStartCol selectionEndLine
-		selectionEndCol clickPos clickStartLine clickStartCol clickLine clickCol
-		clickCount expandingTop wordStartCol wordStartLine wordEndCol
-		wordEndLine selectionFgColor selectionBgColor selectStyle
-		directoryForFileDialog defaultFileNameForFileDialog
+		selectionEndCol clickPos clickStartLine clickStartCol clickLine
+		clickCol clickCount expandingTop wordStartCol wordStartLine
+		wordEndCol wordEndLine selectionFgColor selectionBgColor
+		selectStyle directoryForFileDialog defaultFileNameForFileDialog
 		externalEncoding contentsWasSaved lastSearchPattern
 		lastSearchIgnoredCase lastSearchDirection'
 	classVariableNames:'DefaultViewBackground DefaultSelectionForegroundColor
@@ -2451,9 +2451,9 @@
     "set the searchpattern for future searches"
 
     aString isNil ifTrue:[
-	lastSearchPattern := aString 
+        lastSearchPattern := aString 
     ] ifFalse:[
-	lastSearchPattern := aString withoutSeparators string
+        lastSearchPattern := aString asString withoutSeparators string
     ].
 
     "Modified: / 6.3.1999 / 23:47:36 / cg"
@@ -2922,5 +2922,5 @@
 !TextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.132 1999-03-12 08:34:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.133 1999-04-14 11:08:47 tm Exp $'
 ! !