From 1c67879fbc54d78cd8bf2c0437c0f37737e47163 Mon Sep 17 00:00:00 2001 From: Ivan Malison Date: Tue, 28 Mar 2017 17:57:25 -0700 Subject: [PATCH] [XMonad] Fixups --- dotfiles/xmonad/xmonad.hs | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) diff --git a/dotfiles/xmonad/xmonad.hs b/dotfiles/xmonad/xmonad.hs index 0b5bad12..2f0ad850 100644 --- a/dotfiles/xmonad/xmonad.hs +++ b/dotfiles/xmonad/xmonad.hs @@ -319,7 +319,8 @@ myDecorateName ws w = do return $ printf "%-20s%-40s %+30s" classTitle (take 40 name) "in " ++ workspaceToName (W.tag ws) --- This needs access to X in order to unminimize, which means that I can't be + +-- This needs access to X in order to unminimize, which means that it can't be -- done with the existing window bringer interface myWindowAct c@WindowBringerConfig { menuCommand = cmd , menuArgs = args @@ -331,9 +332,7 @@ myWindowAct c@WindowBringerConfig { menuCommand = cmd myBringWindow window = - sequence_ [ maximizeWindow window - , windows $ W.focusWindow window . bringWindow window - ] + maximizeWindow window >> (windows $ W.focusWindow window . bringWindow window) -- Dynamic Workspace Renaming