default last search string, if there is no
authorClaus Gittinger <cg@exept.de>
Mon, 07 Feb 2000 14:38:46 +0100
changeset 2590 bc4befd23834
parent 2589 2342403139a7
child 2591 613b7c72371c
default last search string, if there is no selection.
BrowserView.st
--- a/BrowserView.st	Mon Feb 07 12:43:32 2000 +0100
+++ b/BrowserView.st	Mon Feb 07 14:38:46 2000 +0100
@@ -11173,6 +11173,12 @@
     ] ifFalse:[
         sel := self stringToSearchFor.
     ].
+    sel size == 0 ifTrue:[
+        "/ use last searchString
+        LastSearchPatterns size > 0 ifTrue:[
+            sel := LastSearchPatterns first.
+        ].
+    ].
     selectorHolder := sel asValue.
 
     box := Dialog new.
@@ -13817,6 +13823,6 @@
 !BrowserView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.593 2000-02-07 11:34:49 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.594 2000-02-07 13:38:46 cg Exp $'
 ! !
 BrowserView initialize!