started hacking on XMonad

1 files changed, 41 insertions, 0 deletions

diff --git a/xmonad.hs b/xmonad.hs
new file mode 100644
index 00000000..e046a50b
--- /dev/null
+++ b/xmonad.hs
@@ -0,0 +1,41 @@
+import XMonad
+import qualified XMonad.StackSet as W
+
+-- layout
+import XMonad.Layout.Gaps
+
+
+main = do
+  xmonad $ def
+    {
+  terminal           = "st",
+  focusFollowsMouse  = True,
+  borderWidth        = 3,
+  modMask            = mod4Mask,
+  workspaces         = myWorkspaces,
+  normalBorderColor  = nBorder,
+  focusedBorderColor = fBorder,
+
+  -- key bindings
+--  keys               = myKeys
+--  mouseBindings      = myMouseBindings,
+
+  -- hooks, layouts
+  layoutHook         = myLayout
+  --manageHook         = myManageHook,
+  --handleEventHook    = myEventHook,
+  --logHook            = myLogHook,
+  --startupHook        = myStartupHook
+}
+
+nBorder = "#bf00ff"
+fBorder = "#FB027F"
+
+myExtraWorkspaces = [(xK_0, "10")] -- ,(xK_minus, "tmp"),(xK_equal, "swap")]
+myWorkspaces = ["1","2","3","4","5","6","7","8","9"] ++ (map snd myExtraWorkspaces)
+
+-- myKeys = 
+--       [ 
+--       ]
+
+myLayout = gaps [(U,6), (D,6), (L,6),  (R,6)] $ Tall 3 (1/100) (1/2) ||| Full