twin/xmonad-contrib
1
0
Fork 0
mirror of https://github.com/xmonad/xmonad-contrib.git synced 2025-05-19 11:30:22 -07:00
Code Issues Packages Projects Releases Wiki Activity

Actions.Search.hs: switch inappropriate use of getShellCompl for a historyCompletion

Browse Source 
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.
This commit is contained in:
gwern0 2008-06-07 07:13:31 +00:00
parent da64090416
commit 7b81a45619
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
XMonad/Actions/Search.hs
View File

@ -40,8 +40,8 @@ module XMonad.Actions.Search ( -- * Usage
import Data.Char (chr, ord, isAlpha, isMark, isDigit) import Data.Char (chr, ord, isAlpha, isMark, isDigit)
import Numeric (showIntAtBase) import Numeric (showIntAtBase)
import XMonad (X(), MonadIO, liftIO) import XMonad (X(), MonadIO, liftIO)
import XMonad.Prompt (XPrompt(showXPrompt), mkXPrompt, XPConfig()) import XMonad.Prompt (XPrompt(showXPrompt), mkXPrompt, XPConfig(), historyCompletion)
import XMonad.Prompt.Shell (getBrowser, getShellCompl) import XMonad.Prompt.Shell (getBrowser)
import XMonad.Util.Run (safeSpawn) import XMonad.Util.Run (safeSpawn)
import XMonad.Util.XSelection (getSelection) 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 Prompt's result, passes it to a given searchEngine and opens it in a given
browser. -} browser. -}
promptSearchBrowser :: XPConfig -> Browser -> SearchEngine -> X () 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 {- | Like 'search', but in this case, the string is not specified but grabbed
from the user's response to a prompt. Example: from the user's response to a prompt. Example: