diff options
| author | Vidhu Kant Sharma <vidhukant@protonmail.ch> | 2022-05-21 21:13:48 +0530 |
|---|---|---|
| committer | Vidhu Kant Sharma <vidhukant@protonmail.ch> | 2022-05-21 21:13:48 +0530 |
| commit | 58816ab030ef78b855e0c01036da594968310cde (patch) | |
| tree | 57de80e1eb30c9ad6bd2e0dc2e94a3285505bfa8 /.config/XMonad | |
| parent | fba63a0b136906b8d5636c987e56e1b468efeec4 (diff) | |
Fixed Polybar workspaces not working through XMonad
Diffstat (limited to '.config/XMonad')
| -rw-r--r-- | .config/XMonad/lib/Defaults.hs | 6 | ||||
| -rw-r--r-- | .config/XMonad/lib/Hooks.hs | 2 | ||||
| -rw-r--r-- | .config/XMonad/xmonad.hs | 6 |
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 |