From ee8a7942eea59cae30df953d70a523f3bf1f0323 Mon Sep 17 00:00:00 2001
From: Daniel Schoepe <daniel.schoepe@gmail.com>
Date: Tue, 25 Aug 2009 12:16:30 +0200
Subject: Let the user decide which commands to use in X.H.ServerMode

Ignore-this: 3a1b95f85253ce6059f4528e23c5a3d3

darcs-hash:20090825101630-7f603-100cf20462e6cb4214e0737223f1b9141091f1b5.gz
---
 XMonad/Config/Arossato.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'XMonad/Config/Arossato.hs')

diff --git a/XMonad/Config/Arossato.hs b/XMonad/Config/Arossato.hs
index 4aa0087..c1cbd75 100644
--- a/XMonad/Config/Arossato.hs
+++ b/XMonad/Config/Arossato.hs
@@ -24,6 +24,7 @@ import qualified Data.Map as M
 import XMonad hiding ( (|||) )
 import qualified XMonad.StackSet as W
 
+import XMonad.Actions.Commands
 import XMonad.Actions.CycleWS
 import XMonad.Hooks.DynamicLog hiding (xmobar)
 import XMonad.Hooks.ManageDocks
@@ -98,7 +99,7 @@ arossatoConfig = do
          , normalBorderColor  = "white"
          , focusedBorderColor = "black"
          , keys               = newKeys
-         , handleEventHook    = serverModeEventHook
+         , handleEventHook    = serverModeEventHook defaultCommands
          , focusFollowsMouse  = False
          }
     where
-- 
cgit v1.2.3