aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorla-ninpre <leobrekalini@gmail.com>2023-03-12 19:14:32 +0300
committerla-ninpre <leobrekalini@gmail.com>2023-03-12 19:14:32 +0300
commita79a73f99c907ed274b841ab5ca87549cc97ea0b (patch)
tree6fd27e92cc8964aef57849a5689783a2ca3c6e07
parente00093fb569b5b66f657228e9bcdc463b727bd4b (diff)
downloadxmonad-config-a79a73f99c907ed274b841ab5ca87549cc97ea0b.tar.gz
xmonad-config-a79a73f99c907ed274b841ab5ca87549cc97ea0b.zip
fix manage hook referencing wrong workspacesHEADmain
-rw-r--r--lib/XMonad/Config/LaNinpre.hs40
1 files changed, 20 insertions, 20 deletions
diff --git a/lib/XMonad/Config/LaNinpre.hs b/lib/XMonad/Config/LaNinpre.hs
index bb86142..a736e4b 100644
--- a/lib/XMonad/Config/LaNinpre.hs
+++ b/lib/XMonad/Config/LaNinpre.hs
@@ -197,8 +197,8 @@ editor = terminalEmulator ++ " -e vi"
-- send some windows here and there.
-- | manage hook
-localManageHook :: ManageHook
-localManageHook = composeAll
+localManageHook :: [String] -> ManageHook
+localManageHook ws = composeAll
[ className =? "confirm" --> doFloat
, className =? "file_progress" --> doFloat
, className =? "dialog" --> doFloat
@@ -209,29 +209,29 @@ localManageHook = composeAll
, className =? "toolbar" --> doFloat
, className =? "Image Lounge" --> doFloat
-- web workspace
- , title =? "Mozilla Firefox" --> doShift ( workspacesTP !! 1 )
- , className =? "Brave-browser" --> doShift ( workspacesTP !! 1 )
- , className =? "amfora" --> doShift ( workspacesTP !! 1 )
- , className =? "qutebrowser" --> doShift ( workspacesTP !! 1 )
+ , title =? "Mozilla Firefox" --> doShift ( ws !! 1 )
+ , className =? "Brave-browser" --> doShift ( ws !! 1 )
+ , className =? "amfora" --> doShift ( ws !! 1 )
+ , className =? "qutebrowser" --> doShift ( ws !! 1 )
-- doc workspace
- , className =? "Geary" --> doShift ( workspacesTP !! 3 )
- , className =? "libreoffice" --> doShift ( workspacesTP !! 3 )
+ , className =? "Geary" --> doShift ( ws !! 3 )
+ , className =? "libreoffice" --> doShift ( ws !! 3 )
-- vm workspace
-- chat workspace
- , className =? "discord" --> doShift ( workspacesTP !! 5 )
- , className =? "TelegramDesktop" --> doShift ( workspacesTP !! 5 )
- , className =? "Element" --> doShift ( workspacesTP !! 5 )
- , className =? "Steam" --> doShift ( workspacesTP !! 5 )
+ , className =? "discord" --> doShift ( ws !! 5 )
+ , className =? "TelegramDesktop" --> doShift ( ws !! 5 )
+ , className =? "Element" --> doShift ( ws !! 5 )
+ , className =? "Steam" --> doShift ( ws !! 5 )
-- full workspace
- , isFullscreen --> doShift ( workspacesTP !! 6 )
+ , isFullscreen --> doShift ( ws !! 6 )
-- vid workspace
- , className =? "Deadbeef" --> doShift ( workspacesTP !! 7 )
- , appName =? "mpv" --> doShift ( workspacesTP !! 7 )
- , className =? "vlc" --> doShift ( workspacesTP !! 7 )
+ , className =? "Deadbeef" --> doShift ( ws !! 7 )
+ , appName =? "mpv" --> doShift ( ws !! 7 )
+ , className =? "vlc" --> doShift ( ws !! 7 )
-- gfx workspace
- , className =? "Gimp" --> doShift ( workspacesTP !! 8 )
- , className =? "Blender" --> doShift ( workspacesTP !! 8 )
- , className =? "obs" --> doShift ( workspacesTP !! 8 )
+ , className =? "Gimp" --> doShift ( ws !! 8 )
+ , className =? "Blender" --> doShift ( ws !! 8 )
+ , className =? "obs" --> doShift ( ws !! 8 )
, isFullscreen --> doFullFloat
] <+> namedScratchpadManageHook scratchPads
@@ -535,7 +535,7 @@ laNinpreConfig ws ln = def
{ terminal = terminalEmulator
, modMask = mod4Mask
, layoutHook = localLayoutHook ln
- , manageHook = localManageHook
+ , manageHook = localManageHook ws
, workspaces = ws
, borderWidth = 1
, keys = (`mkKeymap` keybinds ws)