From e79002cf4393d948c6916f73d3edd9cfa20da606 Mon Sep 17 00:00:00 2001 From: Spencer Janssen Date: Mon, 3 May 2010 17:50:17 +0200 Subject: Less refreshing in mouse-2 binding (thanks aavogt) Ignore-this: 5d61d6fd9a7663d0a7a1c8e2526230f7 darcs-hash:20100503155017-25a6b-af89c8923f42cde6478449da0584c643d5bf0a9c --- XMonad/Config.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'XMonad') diff --git a/XMonad/Config.hs b/XMonad/Config.hs index b092af0..87175d9 100644 --- a/XMonad/Config.hs +++ b/XMonad/Config.hs @@ -225,7 +225,7 @@ mouseBindings (XConfig {XMonad.modMask = modMask}) = M.fromList [ ((modMask, button1), \w -> focus w >> mouseMoveWindow w >> windows W.shiftMaster) -- mod-button2 %! Raise the window to the top of the stack - , ((modMask, button2), \w -> focus w >> windows W.shiftMaster) + , ((modMask, button2), windows . (W.shiftMaster .) . W.focusWindow) -- mod-button3 %! Set the window to floating mode and resize by dragging , ((modMask, button3), \w -> focus w >> mouseResizeWindow w >> windows W.shiftMaster) -- cgit v1.2.3