diff options
| author | gwern0 <gwern0@gmail.com> | 2008-06-07 09:13:31 +0200 |
|---|---|---|
| committer | gwern0 <gwern0@gmail.com> | 2008-06-07 09:13:31 +0200 |
| commit | 968938892ceedba74e0d7d090d3deaa036ed6380 (patch) | |
| tree | 28931e4254cf63135a0f8ad15958f8bca67d0efc /XMonad/Actions | |
| parent | e66e7b49e14e98fd2d6415d57ba9bcac9a727ea2 (diff) | |
| download | XMonadContrib-968938892ceedba74e0d7d090d3deaa036ed6380.tar.gz XMonadContrib-968938892ceedba74e0d7d090d3deaa036ed6380.tar.xz XMonadContrib-968938892ceedba74e0d7d090d3deaa036ed6380.zip | |
Actions.Search.hs: switch inappropriate use of getShellCompl for a historyCompletion
It's inappropriate because if I am searching Wikipedia, say, why on earth do I want completion of files and executables on my PC? A previous search query is much more likely to be what I want.
darcs-hash:20080607071331-f7719-1d06bd99864e561bec53dd8ab0a4742ac801a1bf.gz
Diffstat (limited to 'XMonad/Actions')
| -rw-r--r-- | XMonad/Actions/Search.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/XMonad/Actions/Search.hs b/XMonad/Actions/Search.hs index 74426bc..0a5566a 100644 --- a/XMonad/Actions/Search.hs +++ b/XMonad/Actions/Search.hs @@ -40,8 +40,8 @@ module XMonad.Actions.Search ( -- * Usage import Data.Char (chr, ord, isAlpha, isMark, isDigit) import Numeric (showIntAtBase) import XMonad (X(), MonadIO, liftIO) -import XMonad.Prompt (XPrompt(showXPrompt), mkXPrompt, XPConfig()) -import XMonad.Prompt.Shell (getBrowser, getShellCompl) +import XMonad.Prompt (XPrompt(showXPrompt), mkXPrompt, XPConfig(), historyCompletion) +import XMonad.Prompt.Shell (getBrowser) import XMonad.Util.Run (safeSpawn) import XMonad.Util.XSelection (getSelection) @@ -211,7 +211,7 @@ wayback = searchEngine "wayback" "http://web.archive.org/" Prompt's result, passes it to a given searchEngine and opens it in a given browser. -} promptSearchBrowser :: XPConfig -> Browser -> SearchEngine -> X () -promptSearchBrowser config browser (SearchEngine name site) = mkXPrompt (Search name) config (getShellCompl []) $ search browser site +promptSearchBrowser config browser (SearchEngine name site) = mkXPrompt (Search name) config (historyCompletion) $ search browser site {- | Like 'search', but in this case, the string is not specified but grabbed from the user's response to a prompt. Example: |