twin/xmonad
1
0
Fork 0
mirror of https://github.com/xmonad/xmonad.git synced 2025-08-21 22:43:48 -07:00
Code Issues Packages Projects Releases Wiki Activity

Remove redundant setFocus, setFocus is called by refresh which is called by windows

Browse Source
This commit is contained in:
Spencer Janssen
2007-04-05 21:58:32 +00:00
parent 24930dae04
commit 384a30b7ae
1 changed files with 0 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
Operations.hs
View File

@@ -125,14 +125,11 @@ moveWindowInside d w r = do
-- | manage. Add a new window to be managed in the current workspace. Bring it into focus. -- | manage. Add a new window to be managed in the current workspace. Bring it into focus.
-- If the window is already under management, it is just raised. -- If the window is already under management, it is just raised.
-- --
-- When we start to manage a window, it gains focus.
--
manage :: Window -> X () manage :: Window -> X ()
manage w = do manage w = do
withDisplay $ \d -> io $ do withDisplay $ \d -> io $ do
selectInput d w $ structureNotifyMask .|. enterWindowMask .|. propertyChangeMask selectInput d w $ structureNotifyMask .|. enterWindowMask .|. propertyChangeMask
mapWindow d w mapWindow d w
setFocus w
windows $ W.push w windows $ W.push w
-- | unmanage. A window no longer exists, remove it from the window -- | unmanage. A window no longer exists, remove it from the window