From ca84fefdc3d74be165bca3ad09e6e7552ff450a4 Mon Sep 17 00:00:00 2001
From: Alexander Sulfrian <alexander@sulfrian.net>
Date: Mon, 14 Sep 2015 19:39:55 +0200
Subject: Remove intermediate myConfig function
---
xmonad.hs | 31 ++++++++++++++-----------------
1 file changed, 14 insertions(+), 17 deletions(-)
diff --git a/xmonad.hs b/xmonad.hs
index 9c38d7d..d70ae03 100644
--- a/xmonad.hs
+++ b/xmonad.hs
@@ -99,23 +99,20 @@ main = do
-- overwrite the setWMName "LG3D" and some Java apps will not work.
$ pagerHints
$ withUrgencyHook myDzenUrgencyConfig
- $ myConfig dzenStatusFile
-
-myConfig statusFile = defaultConfig
- { modMask = modM
- , terminal = term
- , borderWidth = 1
- , normalBorderColor = "#545454"
- , focusedBorderColor = "#A00000"
- , logHook = myLogHook statusFile
- , manageHook = myManageHook
- , keys = \c -> mkKeymap c $ myKeys c
- , mouseBindings = \c -> M.union (M.fromList $ myMouse c) $ mouseBindings defaultConfig c
- , layoutHook = myLayout
- , workspaces = myWorkspaces
- , handleEventHook = myEventHook
- , startupHook = myStartupHook
- }
+ $ defaultConfig { modMask = modM
+ , terminal = term
+ , borderWidth = 1
+ , normalBorderColor = "#545454"
+ , focusedBorderColor = "#A00000"
+ , logHook = myLogHook dzenStatusFile
+ , manageHook = myManageHook
+ , keys = \c -> mkKeymap c $ myKeys c
+ , mouseBindings = \c -> M.union (M.fromList $ myMouse c) $ mouseBindings defaultConfig c
+ , layoutHook = myLayout
+ , workspaces = myWorkspaces
+ , handleEventHook = myEventHook
+ , startupHook = myStartupHook
+ }
--}}}
--
cgit v1.2.3