From ce8dc62233514e70c5e4785574df9d07a5d2739b Mon Sep 17 00:00:00 2001
From: Spencer Janssen <sjanssen@cse.unl.edu>
Date: Wed, 30 Apr 2008 10:22:53 +0200
Subject: Add XMonad.Config.Desktop and XMonad.Config.Gnome
darcs-hash:20080430082253-a5988-66822252a13bee869034da162f4a127ae06f9992.gz
---
XMonad/Config/Desktop.hs | 33 +++++++++++++++++++++++++++++++++
XMonad/Config/Gnome.hs | 32 ++++++++++++++++++++++++++++++++
xmonad-contrib.cabal | 2 ++
3 files changed, 67 insertions(+)
create mode 100644 XMonad/Config/Desktop.hs
create mode 100644 XMonad/Config/Gnome.hs
diff --git a/XMonad/Config/Desktop.hs b/XMonad/Config/Desktop.hs
new file mode 100644
index 0000000..d004dbe
--- /dev/null
+++ b/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
+
diff --git a/XMonad/Config/Gnome.hs b/XMonad/Config/Gnome.hs
new file mode 100644
index 0000000..5aa2f3e
--- /dev/null
+++ b/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" }
diff --git a/xmonad-contrib.cabal b/xmonad-contrib.cabal
index c525e96..86aa590 100644
--- a/xmonad-contrib.cabal
+++ b/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
--
cgit v1.2.3