ui.gadgets.editors: make it easier to set and get default-text.

[factor.git] / basis / ui / tools / browser / browser.factor

diff --git a/basis/ui/tools/browser/browser.factor b/basis/ui/tools/browser/browser.factor
index e05f6092375ff591e11a3e26017ef86f82dba9c5..15856529466fe460a7a543f1a025fd6e68febe37 100644 (file)
--- a/basis/ui/tools/browser/browser.factor
+++ b/basis/ui/tools/browser/browser.factor
@@ -101,7 +101,7 @@ CONSTANT: next 1
 
 : <search-field> ( browser -- field )
     '[ _ search-browser ] <action-field>
-        dup editor>> "Search" >>default-text drop
+        "Search" >>default-text
         10 >>min-cols
         10 >>max-cols
         white-interior ;