From d5e5589da8864bdf1a3ca95338dab7966b6b0ceb Mon Sep 17 00:00:00 2001 From: Alexander Iljin <ajsoft@yandex.ru> Date: Sat, 21 May 2016 21:54:30 +0300 Subject: [PATCH] browser: trim whitespace from query before search. This behavior is consistent with the apropos word. Should have been done in e4bf5f10. --- basis/ui/tools/browser/browser.factor | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/basis/ui/tools/browser/browser.factor b/basis/ui/tools/browser/browser.factor index 1cb761dd8c..acd3194f58 100644 --- a/basis/ui/tools/browser/browser.factor +++ b/basis/ui/tools/browser/browser.factor @@ -11,7 +11,7 @@ ui.gadgets.panes ui.gadgets.scrollers ui.gadgets.status-bar ui.theme ui.gadgets.toolbar ui.gadgets.tracks ui.gadgets.viewports ui.gadgets.worlds ui.gestures ui.pens.solid ui.render ui.text ui.theme.images ui.tools.common -ui.tools.browser.history ui.tools.browser.popups vocabs ; +ui.tools.browser.history ui.tools.browser.popups unicode vocabs ; IN: ui.tools.browser TUPLE: browser-gadget < tool history scroller search-field popup ; @@ -97,7 +97,7 @@ CONSTANT: next 1 <scroller> >>scroller scroller>> white-interior 1 track-add ; : search-browser ( string browser -- ) - '[ <apropos-search> _ show-help ] unless-empty ; + '[ [ blank? ] trim <apropos-search> _ show-help ] unless-empty ; : <search-field> ( browser -- field ) '[ _ search-browser ] <action-field>