From 9c464f9fa63a8fa81f095fad170fc23c17ec5f62 Mon Sep 17 00:00:00 2001
From: Don Stewart <dons@galois.com>
Date: Wed, 7 Nov 2007 19:31:07 +0100
Subject: add higher order 'dzen' function

The intent is that:

    main

darcs-hash:20071107183107-cba2c-9b30182c82b98ccb2bf41f7c574946cbcb1be95f.gz
---
 XMonad/Config/Dons.hs | 15 ++++++---------
 1 file changed, 6 insertions(+), 9 deletions(-)

(limited to 'XMonad/Config')

diff --git a/XMonad/Config/Dons.hs b/XMonad/Config/Dons.hs
index ef5ccef..b8d62a1 100644
--- a/XMonad/Config/Dons.hs
+++ b/XMonad/Config/Dons.hs
@@ -13,15 +13,12 @@
 module XMonad.Config.Dons where
 
 import XMonad
-import XMonad.Config
 import XMonad.Hooks.DynamicLog
 
-config :: XConfig
-config = defaultConfig
-    { borderWidth        = 2
-    , defaultGaps        = [(18,0,0,0)]
-    , terminal           = "term"
-    , normalBorderColor  = "#cccccc"
-    , focusedBorderColor = "#cd8b00"
-    , logHook            = dynamicLogDzen }
+donsMain :: IO ()
+donsMain = dzen $ \conf -> xmonad $ conf
+        { borderWidth        = 2
+        , terminal           = "term"
+        , normalBorderColor  = "#cccccc"
+        , focusedBorderColor = "#cd8b00" }
 
-- 
cgit v1.2.3