aboutsummaryrefslogtreecommitdiff
path: root/.config/XMonad
diff options
context:
space:
mode:
Diffstat (limited to '.config/XMonad')
-rw-r--r--.config/XMonad/lib/Defaults.hs6
-rw-r--r--.config/XMonad/lib/Hooks.hs2
-rw-r--r--.config/XMonad/xmonad.hs6
3 files changed, 7 insertions, 7 deletions
diff --git a/.config/XMonad/lib/Defaults.hs b/.config/XMonad/lib/Defaults.hs
index 0d751d6..c528829 100644
--- a/.config/XMonad/lib/Defaults.hs
+++ b/.config/XMonad/lib/Defaults.hs
@@ -58,10 +58,10 @@ myExtraWorkspaces = [(xK_0, "十")]
myWorkspaces = ["一", "二", "三", "四", "五", "六", "七", "八", "九"] ++ map snd myExtraWorkspaces
-- screen gaps
-sGap = 4
-wGap = 6
+sGap = 3
+wGap = 4
-myGap = spacingRaw True (Border sGap sGap sGap sGap) True (Border wGap wGap wGap wGap) True
+myGap = spacingRaw True (Border sGap sGap sGap sGap) True (Border wGap wGap wGap wGap) True
myTabTheme = def {
fontName = myFont
diff --git a/.config/XMonad/lib/Hooks.hs b/.config/XMonad/lib/Hooks.hs
index 9464b41..b51f076 100644
--- a/.config/XMonad/lib/Hooks.hs
+++ b/.config/XMonad/lib/Hooks.hs
@@ -6,11 +6,11 @@ import XMonad
import XMonad.Layout.Spacing
import XMonad.Layout.WindowNavigation as WN
import XMonad.Layout.Maximize
-import XMonad.Layout.NoBorders
import XMonad.Layout.BinarySpacePartition as BSP
import XMonad.Layout.Grid
import XMonad.Layout.Tabbed
+import XMonad.Layout.NoBorders
import XMonad.Hooks.SetWMName
import XMonad.Hooks.ManageDocks
diff --git a/.config/XMonad/xmonad.hs b/.config/XMonad/xmonad.hs
index a991cb8..ad75f9d 100644
--- a/.config/XMonad/xmonad.hs
+++ b/.config/XMonad/xmonad.hs
@@ -14,7 +14,7 @@ import Hooks
main :: IO ()
main = do
- xmonad $ ewmhFullscreen $ docks def {
+ xmonad $ ewmhFullscreen $ ewmh $ docks def {
focusFollowsMouse = True
, terminal = myTerminal
, borderWidth = myBorderWidth
@@ -25,6 +25,6 @@ main = do
, layoutHook = myLayoutHook
, startupHook = myStartupHook
, manageHook = myManageHook
- } `additionalKeys` myKeybindings
- `additionalKeysP` myKeybindingsP
+ } `additionalKeys` myKeybindings
+ `additionalKeysP` myKeybindingsP
`additionalMouseBindings` myMouseKeybindings