diff options
| -rw-r--r-- | xmonad.hs | 19 |
1 files changed, 6 insertions, 13 deletions
@@ -6,7 +6,6 @@ import qualified XMonad.StackSet as W import XMonad.Actions.CycleWS (moveTo, shiftTo, WSType(..), nextScreen, prevScreen) import XMonad.Actions.CopyWindow import XMonad.Actions.CycleWS ---import XMonad.Actions.CycleSelectedLayouts import XMonad.Actions.GridSelect import XMonad.Actions.SwapWorkspaces import XMonad.Actions.WindowBringer @@ -73,18 +72,19 @@ myBrowser = "firefox" -- wm variables -nBorder = "#bf00ff" +nBorder = "#3804f4" -- "#bf00ff" fBorder = "#FB027F" myBorderWidth = 2 +sGap = 0 -- screen gap +wGap = 1 -- window gap + myExtraWorkspaces = [(xK_0, "10")] -- ,(xK_minus, "tmp"),(xK_equal, "swap")] myWorkspaces = ["1","2","3","4","5","6","7","8", "9"] ++ (map snd myExtraWorkspaces) -- keybindings - - myKeys = [ ((mod4Mask, xK_Return), spawn myTerminal) , ((mod1Mask, xK_w), kill1) @@ -136,9 +136,6 @@ myKeys = [ -- paste x selection , ((0, xK_Insert), pasteSelection) - -- toggle layouts --- , ((mod4Mask, xK_t ), cycleThroughLayouts ["Grid", "Mirror Tall"]) - -- toggle bars , ((mod1Mask, xK_backslash), sendMessage ToggleStruts) -- toggle both bars , ((mod1Mask, xK_bracketleft), sendMessage $ ToggleStrut D) -- toggle bottom bar @@ -175,13 +172,9 @@ myKeys = [ -- layouts - -sGap = 2 -wGap = 2 - myGap = spacingRaw False (Border sGap sGap sGap sGap) True (Border wGap wGap wGap wGap) True -myLayouts = avoidStruts $ mouseResize $ windowNavigation $ myGap $ emptyBSP ||| ThreeColMid 1 (3/100) (1/2) ||| Grid ||| topRightMaster emptyBSP ||| TwoPane (3/100) (1/2) ||| ThreeCol 1 (3/100) (1/2) ||| ThreeCol 2 (3/100) (1/2) +myLayouts = avoidStruts $ mouseResize $ windowNavigation $ myGap $ emptyBSP ||| ThreeColMid 1 (3/100) (1/2) ||| Grid ||| TwoPane (3/100) (1/2) ||| ThreeCol 1 (3/100) (1/2) ||| ThreeCol 2 (3/100) (1/2) ||| topRightMaster emptyBSP myLayoutHook = myLayouts @@ -198,7 +191,7 @@ main = do workspaces = myWorkspaces, normalBorderColor = nBorder, focusedBorderColor = fBorder, --- mouseBindings = myMouseBindings, + -- mouseBindings = myMouseBindings, layoutHook = myLayoutHook, -- manageHook = myManageHook, -- handleEventHook = myEventHook, |