diff options
| author | lassulus <lassulus@lassul.us> | 2019-04-07 19:30:03 +0200 |
|---|---|---|
| committer | lassulus <lassulus@lassul.us> | 2019-04-07 19:36:05 +0200 |
| commit | 6d5e7d85dc780408e97f04a770b94c491dbcd422 (patch) | |
| tree | 5810911d6346dbb9354352d22fe29802222d61a2 /lass/5pkgs/custom | |
| parent | 162b965b6bc98381a0e87f72eca491ff2dd2b53d (diff) | |
l xmonad: fix multi-monitor issue
Diffstat (limited to 'lass/5pkgs/custom')
| -rw-r--r-- | lass/5pkgs/custom/xmonad-lass/default.nix | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lass/5pkgs/custom/xmonad-lass/default.nix b/lass/5pkgs/custom/xmonad-lass/default.nix index 1f2e7110e..1cd91526d 100644 --- a/lass/5pkgs/custom/xmonad-lass/default.nix +++ b/lass/5pkgs/custom/xmonad-lass/default.nix @@ -133,7 +133,7 @@ myKeyMap = , ("M4-f", floatNext True) , ("M4-b", sendMessage ToggleStruts) - , ("M4-v", gets windowset >>= allWorkspaceNames >>= pager pagerConfig (windows . W.view) ) + , ("M4-v", gets windowset >>= allWorkspaceNames >>= pager pagerConfig (windows . W.greedyView) ) , ("M4-S-v", gets windowset >>= allWorkspaceNames >>= pager pagerConfig (windows . W.shift) ) , ("M4-C-v", withWorkspace autoXPConfig (windows . copy)) @@ -220,7 +220,7 @@ gridConfig = def allWorkspaceNames :: W.StackSet i l a sid sd -> X [i] allWorkspaceNames ws = - return $ map W.tag (W.hidden ws) ++ [W.tag $ W.workspace $ W.current ws] + return $ map W.tag (W.hidden ws ++ (map W.workspace $ W.visible ws)) ++ [W.tag $ W.workspace $ W.current ws] ''; }; } |