steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

browser: trim whitespace from query before search. 

This behavior is consistent with the apropos word.
Should have been done in e4bf5f10.
locals-and-roots
Alexander Iljin 2016-05-21 21:54:30 +03:00 committed by John Benediktsson
parent 1e0bf40b7f
commit d5e5589da8
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
basis/ui/tools/browser/browser.factor
View File

@ -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>