From f8de0614a744790c76ff89f518985983108be0ad Mon Sep 17 00:00:00 2001
From: Brent Yorgey <byorgey@gmail.com>
Date: Sat, 22 Dec 2007 19:49:12 +0100
Subject: Search.hs: add hoogle

darcs-hash:20071222184912-bd4d7-e7bd40a137ab360c88a92b64f413536a699294c1.gz
---
 XMonad/Util/Search.hs | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

(limited to 'XMonad/Util/Search.hs')

diff --git a/XMonad/Util/Search.hs b/XMonad/Util/Search.hs
index ef88058..efbebac 100644
--- a/XMonad/Util/Search.hs
+++ b/XMonad/Util/Search.hs
@@ -23,7 +23,8 @@ module XMonad.Util.Search (      -- * Usage
                                  google,
                                  imdb,
                                  wayback,
-                                 wikipedia
+                                 wikipedia,
+                                 hoogle
                           ) where
 
 import Data.Char (chr, ord, isAlpha, isMark, isDigit)
@@ -76,7 +77,7 @@ simpleEngine :: String -> SearchEngine
 simpleEngine site query = site ++ escape query
 
 -- The engines
-amazon, google, imdb, wayback, wikipedia :: SearchEngine
+amazon, google, imdb, wayback, wikipedia, hoogle :: SearchEngine
 amazon    = simpleEngine "http://www.amazon.com/exec/obidos/external-search?index=all&keyword="
 google    = simpleEngine "http://www.google.com/search?num=100&q="
 imdb      = simpleEngine "http://www.imdb.com/Find?select=all&for="
@@ -85,6 +86,7 @@ wayback   = simpleEngine "http://web.archive.org/"
 {- This doesn't seem to work, but nevertheless, it seems to be the official
    method at <http://web.archive.org/collections/web/advanced.html> to get the
    latest backup. -}
+hoogle    = simpleEngine "http://www.haskell.org/hoogle/?q="
 
 -- | Like 'search', but in this case, the string is not specified but grabbed
 -- from the user's response to a prompt.
-- 
cgit v1.2.3