From 16b75c661c1863c23258cf1f32b5a86e8b58b688 Mon Sep 17 00:00:00 2001
From: Adam Vogt <vogt.adam@gmail.com>
Date: Thu, 29 Apr 2010 15:47:49 +0200
Subject: A.Search: Remove unnecessary `do'

Ignore-this: 2fc31d045a57ccd01f3af03cb46440c2

darcs-hash:20100429134749-1499c-a2107f9d50b9366982b5c3ab43828e2ec5dbaabb.gz
---
 XMonad/Actions/Search.hs | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'XMonad')

diff --git a/XMonad/Actions/Search.hs b/XMonad/Actions/Search.hs
index 16625a6..d1bc596 100644
--- a/XMonad/Actions/Search.hs
+++ b/XMonad/Actions/Search.hs
@@ -226,8 +226,7 @@ use (SearchEngine _ engine) = engine
 -- | Given a browser, a search engine's transformation function, and a search term, perform the
 --   requested search in the browser.
 search :: Browser -> Site -> Query -> X ()
-search browser site query = do
-  safeSpawn browser [site query]
+search browser site query = safeSpawn browser [site query]
 
 {- | Given a base URL, create the 'SearchEngine' that escapes the query and
    appends it to the base. You can easily define a new engine locally using
-- 
cgit v1.2.3