From cf84ae4653a48c6676fbbf446aaf81dabb1e7164 Mon Sep 17 00:00:00 2001 From: Ivan Malison Date: Fri, 9 Sep 2016 17:48:28 -0700 Subject: [PATCH] Add xmonad config --- dotfiles/xmonad/xmonad.hs | 19 +++++++++++++++++++ 1 file changed, 19 insertions(+) create mode 100644 dotfiles/xmonad/xmonad.hs diff --git a/dotfiles/xmonad/xmonad.hs b/dotfiles/xmonad/xmonad.hs new file mode 100644 index 00000000..a19355f0 --- /dev/null +++ b/dotfiles/xmonad/xmonad.hs @@ -0,0 +1,19 @@ +import XMonad +import XMonad.Actions.WindowBringer +import XMonad.Config() +import XMonad.Util.CustomKeys + +main :: IO () +main = xmonad defaultConfig + { modMask = mod4Mask -- Use Super instead of Alt + , keys = customKeys delkeys inskeys + } + where + delkeys :: XConfig l -> [(KeyMask, KeySym)] + delkeys _ = [ ] + + inskeys :: XConfig l -> [((KeyMask, KeySym), X ())] + inskeys conf = + [ ((mod4Mask, xK_g), gotoMenu) + , ((mod4Mask, xK_b), bringMenu) + ]