colonelpanic/dotfiles
1
0
Fork 1
Code Issues Pull Requests Packages Projects Releases Wiki Activity

[XMonad] Make greedyFocusWindow focus window

Browse Source 
Before, greedyView greedyFocusWindow would only focus the workspace that
the selected window was in. This change makes it so that the window is
actually focused.
This commit is contained in:
Ivan Malison 2016-10-23 17:32:27 -07:00
parent aecee0f2d5
commit 761dabb23f
No known key found for this signature in database
GPG Key ID: 62530EFBE99DC2F8
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
dotfiles/xmonad/xmonad.hs
View File

@ -102,9 +102,13 @@ myLayoutHook = avoidStruts . smartSpacing 10 . noBorders . minimize .
myStartup = spawn "systemctl --user start wm.target" myStartup = spawn "systemctl --user start wm.target"
greedyFocusWindow w ws = W.greedyView (fromMaybe (W.currentTag ws) $ W.findTag w ws) ws -- Use greedyView to switch to the correct workspace, and then focus on the
-- appropriate window within that workspace.
greedyFocusWindow w ws = W.focusWindow w $ W.greedyView
(fromMaybe (W.currentTag ws) $ W.findTag w ws) ws
shiftToEmptyAndView = doTo Next EmptyWS DWO.getSortByOrder (windows . shiftThenView) shiftToEmptyAndView = doTo Next EmptyWS DWO.getSortByOrder
(windows . shiftThenView)
addKeys conf@XConfig {modMask = modm} = addKeys conf@XConfig {modMask = modm} =
[ ((modm, xK_p), spawn "rofi -show drun") [ ((modm, xK_p), spawn "rofi -show drun")