1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
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
|
