diff options
| -rw-r--r-- | XMonad/Operations.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/XMonad/Operations.hs b/XMonad/Operations.hs index f0391bc..e26d733 100644 --- a/XMonad/Operations.hs +++ b/XMonad/Operations.hs @@ -200,7 +200,7 @@ reveal :: Window -> X () reveal w = withDisplay $ \d -> do setWMState w normalState io $ mapWindow d w - modify (\s -> s { mapped = S.insert w (mapped s) }) + whenX (isClient w) $ modify (\s -> s { mapped = S.insert w (mapped s) }) -- | The client events that xmonad is interested in clientMask :: EventMask |