diff options
Diffstat (limited to '')
| -rw-r--r-- | XMonad/Util/Search.hs | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/XMonad/Util/Search.hs b/XMonad/Util/Search.hs index 17b7e8c..b767971 100644 --- a/XMonad/Util/Search.hs +++ b/XMonad/Util/Search.hs @@ -25,10 +25,8 @@ module XMonad.Util.Search ( -- * Usage search ) where -import Data.Char (isAlpha, isDigit, isMark) import XMonad (io, X()) import XMonad.Util.Run (safeSpawn) -import Network.URI (escapeURIString) import XMonad.Prompt.Shell (getShellCompl) import XMonad.Prompt (XPrompt(showXPrompt), mkXPrompt, XPConfig()) import XMonad.Util.XSelection (getSelection) @@ -43,7 +41,7 @@ instance XPrompt Search where -- funny, but that produces obfuscated search queries. So we merely escape -- anything that doesn't look unfunny. escape :: String -> String -escape = escapeURIString (\c -> isAlpha c || isDigit c || isMark c) +escape = id -- | Given the base search URL, a browser to use, and the actual query, escape -- the query, prepend the base URL, and hand it off to the browser. |