aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorDavid Roundy <droundy@darcs.net>2007-12-16 19:56:53 +0100
committerDavid Roundy <droundy@darcs.net>2007-12-16 19:56:53 +0100
commit0ea6e96512fb5a686454964953a9dfe8f99340a2 (patch)
tree4ef7680829802f1ad2fd02f062771db4846e5189
parentc730e61e2bb18da5e31be2deec653fc70cf86a24 (diff)
downloadXMonadContrib-0ea6e96512fb5a686454964953a9dfe8f99340a2.tar.gz
XMonadContrib-0ea6e96512fb5a686454964953a9dfe8f99340a2.tar.xz
XMonadContrib-0ea6e96512fb5a686454964953a9dfe8f99340a2.zip
update Config.Droundy to use a few nice hooks.
darcs-hash:20071216185653-72aca-d4d8143e6e1efadbc2ad4fa1b7d8c49dd207a320.gz
-rw-r--r--XMonad/Config/Droundy.hs8
1 files changed, 5 insertions, 3 deletions
diff --git a/XMonad/Config/Droundy.hs b/XMonad/Config/Droundy.hs
index e37a9a5..0657dd5 100644
--- a/XMonad/Config/Droundy.hs
+++ b/XMonad/Config/Droundy.hs
@@ -41,8 +41,8 @@ import XMonad.Actions.CopyWindow
import XMonad.Actions.DynamicWorkspaces
import XMonad.Actions.RotView
---import XMonad.Hooks.ManageDocks
---import XMonad.Hooks.UrgencyHook
+import XMonad.Hooks.ManageDocks
+import XMonad.Hooks.UrgencyHook
myXPConfig :: XPConfig
myXPConfig = defaultXPConfig {font="-*-lucida-medium-r-*-*-14-*-*-*-*-*-*-*"
@@ -127,13 +127,15 @@ keys x = M.fromList $
zip (zip (repeat (modMask x .|. shiftMask)) [xK_F1..xK_F12]) (map (withNthWorkspace copy) [0..])
config = -- withUrgencyHook FocusUrgencyHook $
+ withUrgencyHook NoUrgencyHook $
defaultConfig
{ borderWidth = 1 -- Width of the window border in pixels.
, XMonad.workspaces = ["1:mutt","2:iceweasel"]
, layoutHook = workspaceDir "~" $ windowNavigation $
- toggleLayouts (noBorders Full) $ -- avoidStruts $
+ toggleLayouts (noBorders Full) $ avoidStruts $
Named "tabbed" (noBorders mytab) |||
Named "xclock" (mytab ****//* combineTwo Square mytab mytab) |||
+ Named "three" (mytab **//* mytab *//* combineTwo Square mytab mytab) |||
Named "widescreen" ((mytab *||* mytab)
****//* combineTwo Square mytab mytab) -- |||
--mosaic 0.25 0.5