diff options
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/XMonad/Config/LaNinpre.hs | 40 |
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) |