Add XMonad.Config.Desktop and XMonad.Config.Gnome

XMonad/Config/Desktop.hs

@@ -0,0 +1,33 @@
+{-# OPTIONS_GHC -fno-warn-missing-signatures #-}
+
+-----------------------------------------------------------------------------
+-- |
+-- Module       : XMonad.Config.Desktop
+-- Copyright    : (c) Spencer Janssen <sjanssen@cse.unl.edu>
+-- License      : BSD
+--
+-- Maintainer   : Spencer Janssen <sjanssen@cse.unl.edu>
+--
+-- This module provides a config suitable for use with a desktop
+-- environment such as KDE or GNOME.
+
+module XMonad.Config.Desktop (
+    -- * Usage
+    -- -- $usage
+    desktopConfig,
+    desktopLayoutModifiers
+    ) where
+
+import XMonad
+import XMonad.Config (defaultConfig)
+import XMonad.Hooks.ManageDocks
+import XMonad.Hooks.EwmhDesktops
+
+desktopConfig = defaultConfig
+                { logHook    = ewmhDesktopsLogHook
+                , layoutHook = desktopLayoutModifiers $ layoutHook defaultConfig
+                , manageHook = manageHook defaultConfig <+> manageDocks
+                }
+
+desktopLayoutModifiers = avoidStruts . ewmhDesktopsLayout
+

XMonad/Config/Gnome.hs

@@ -0,0 +1,32 @@
+{-# OPTIONS_GHC -fno-warn-missing-signatures #-}
+
+-----------------------------------------------------------------------------
+-- |
+-- Module       : XMonad.Config.Gnome
+-- Copyright    : (c) Spencer Janssen <sjanssen@cse.unl.edu>
+-- License      : BSD
+--
+-- Maintainer   : Spencer Janssen <sjanssen@cse.unl.edu>
+--
+-- This module provides a config suitable for use with the GNOME desktop
+-- environment.
+
+module XMonad.Config.Gnome (
+    -- * Usage
+    -- -- $usage
+    gnomeConfig
+    ) where
+
+import XMonad
+import XMonad.Config.Desktop
+
+-- $usage
+-- To use this module, start with the following @~\/.xmonad\/xmonad.hs@:
+--
+-- > import XMonad
+-- > import XMonad.Config.Gnome
+-- >
+-- > main = xmonad gnomeConfig
+-- 
+
+gnomeConfig = desktopConfig { terminal = "gnome-terminal" }

xmonad-contrib.cabal

@@ -98,7 +98,9 @@ library
                         XMonad.Actions.WindowGo
                         XMonad.Actions.WindowBringer
                         XMonad.Config.Arossato
+                        XMonad.Config.Desktop
                         XMonad.Config.Droundy
+                        XMonad.Config.Gnome
                         XMonad.Config.Sjanssen
                         XMonad.Hooks.DynamicLog
                         XMonad.Hooks.EventHook