--- a/TextView.st	Sun Sep 21 20:11:21 1997 +0200
+++ b/TextView.st	Mon Sep 22 21:27:57 1997 +0200
@@ -10,7 +10,7 @@
  hereby transferred.
 "
 
-'From Smalltalk/X, Version:3.1.10 on 19-sep-1997 at 10:57:33 pm'                !
+'From Smalltalk/X, Version:3.2.10 on 22-sep-1997 at 10:17:47 pm'                !
 
 ListView subclass:#TextView
 	instanceVariableNames:'selectionStartLine selectionStartCol selectionEndLine
@@ -1306,6 +1306,7 @@
     ign := lastSearchIgnoredCase ? false.
 
     searchBox := Dialog new.
+    searchBox label:'string search'.
     (searchBox addTextLabel:(resources at:'searchPattern:')) adjust:#left.
     searchBox addVerticalSpace.
     searchBox leftIndent:ViewSpacing; rightIndent:ViewSpacing.    
@@ -1370,7 +1371,7 @@
 "/    ].
 "/    searchBox showAtPointer
 
-    "Modified: 14.9.1997 / 12:22:38 / cg"
+    "Modified: 22.9.1997 / 10:17:16 / cg"
 ! !
 
 !TextView methodsFor:'private'!
@@ -2792,5 +2793,5 @@
 !TextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.105 1997-09-20 22:41:01 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.106 1997-09-22 19:27:57 cg Exp $'
 ! !