diff options
| author | David Roundy <droundy@darcs.net> | 2007-12-16 19:56:53 +0100 |
|---|---|---|
| committer | David Roundy <droundy@darcs.net> | 2007-12-16 19:56:53 +0100 |
| commit | 0ea6e96512fb5a686454964953a9dfe8f99340a2 (patch) | |
| tree | 4ef7680829802f1ad2fd02f062771db4846e5189 /XMonad/Config/Droundy.hs | |
| parent | c730e61e2bb18da5e31be2deec653fc70cf86a24 (diff) | |
| download | XMonadContrib-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
Diffstat (limited to '')
| -rw-r--r-- | XMonad/Config/Droundy.hs | 8 |
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 |