summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorAlan Pearce2014-07-18 20:32:23 +0100
committerAlan Pearce2014-07-18 20:32:23 +0100
commit35a852935e3c7cf53e6bbbcf03b775f2b9958ac9 (patch)
tree7e79101daed378720c84a7a256f2af96a1b4299d
parent9b5c894c35aa17a28163ff523e00a1d36e53d9d3 (diff)
downloadnixfiles-35a852935e3c7cf53e6bbbcf03b775f2b9958ac9.tar.lz
nixfiles-35a852935e3c7cf53e6bbbcf03b775f2b9958ac9.tar.zst
nixfiles-35a852935e3c7cf53e6bbbcf03b775f2b9958ac9.zip
Xmonad: Add initial configuration
-rw-r--r--tag-xmonad/xmonad/xmonad.hs19
1 files changed, 19 insertions, 0 deletions
diff --git a/tag-xmonad/xmonad/xmonad.hs b/tag-xmonad/xmonad/xmonad.hs
new file mode 100644
index 00000000..fda328c0
--- /dev/null
+++ b/tag-xmonad/xmonad/xmonad.hs
@@ -0,0 +1,19 @@
+import XMonad
+import XMonad.Hooks.DynamicLog
+import XMonad.Hooks.ManageDocks
+import XMonad.Util.Run(spawnPipe)
+import XMonad.Util.EZConfig(additionalKeys)
+import System.IO
+
+main = do
+  xmproc <-spawnPipe "/usr/bin/xmobar /home/alan/.xmobarrc"
+  xmonad $ defaultConfig {
+    manageHook = manageDocks <+> manageHook defaultConfig,
+    layoutHook = avoidStruts  $  layoutHook defaultConfig,
+    logHook = dynamicLogWithPP xmobarPP {
+      ppOutput = hPutStrLn xmproc,
+      ppTitle  = xmobarColor "green" "" . shorten 50
+    },
+    terminal = "urxvt",
+    modMask = mod4Mask
+  }