From d66e4d3388d3b2669a15f50ec8aff64a3043ff0c Mon Sep 17 00:00:00 2001
From: Adam Vogt <vogt.adam@gmail.com>
Date: Thu, 19 Dec 2013 21:14:40 +0100
Subject: ServerMode properly indent

Ignore-this: 761b39c3e3c90b6123f068e8b1d34e5d

darcs-hash:20131219201440-1499c-1b093fc7a80b26cb93dd51e455038f275914a2e5.gz
---
 XMonad/Hooks/ServerMode.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'XMonad/Hooks')

diff --git a/XMonad/Hooks/ServerMode.hs b/XMonad/Hooks/ServerMode.hs
index b89530e..ba460e1 100644
--- a/XMonad/Hooks/ServerMode.hs
+++ b/XMonad/Hooks/ServerMode.hs
@@ -168,6 +168,6 @@ serverModeEventHookF key func (ClientMessageEvent {ev_message_type = mt, ev_data
          cmd <- io $ getAtomName d atom
          case cmd of
               Just command -> func command
-          Nothing -> io $ hPutStrLn stderr ("Couldn't retrieve atom " ++ (show atom))
+              Nothing -> io $ hPutStrLn stderr ("Couldn't retrieve atom " ++ (show atom))
         return (All True)
 serverModeEventHookF _ _ _ = return (All True)
-- 
cgit v1.2.3