From c37ed1835d53cfb73a7b36019fe8d4fb315cd502 Mon Sep 17 00:00:00 2001
From: Adam Vogt <vogt.adam@gmail.com>
Date: Sun, 24 Jan 2010 21:21:36 +0100
Subject: Use <+> instead of explicit M.union to merge keybindings in X.C.*

Ignore-this: e7bfd99eb4d3e6735153d1d5ec00a885

darcs-hash:20100124202136-1499c-0a4fde78c7e14b6d473712e8d6e23382232b1908.gz
---
 XMonad/Config/Gnome.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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

diff --git a/XMonad/Config/Gnome.hs b/XMonad/Config/Gnome.hs
index 8fa6b36..9c480bc 100644
--- a/XMonad/Config/Gnome.hs
+++ b/XMonad/Config/Gnome.hs
@@ -41,7 +41,7 @@ import System.Environment (getEnvironment)
 
 gnomeConfig = desktopConfig
     { terminal = "gnome-terminal"
-    , keys     = \c -> gnomeKeys c `M.union` keys desktopConfig c
+    , keys     = gnomeKeys <+> keys desktopConfig
     , startupHook = gnomeRegister >> startupHook desktopConfig }
 
 gnomeKeys (XConfig {modMask = modm}) = M.fromList $
-- 
cgit v1.2.3