mirror of
https://github.com/xmonad/xmonad-contrib.git
synced 2025-05-19 03:20:21 -07:00
Merge pull request #925 from philib/master
fix unintended window hiding
This commit is contained in:
commit
6c1441d9db
@ -50,6 +50,11 @@
|
||||
- Added `focusWorkspace` for focusing workspaces on the screen that they
|
||||
belong to.
|
||||
|
||||
* `XMonad.Util.NamedScratchPad`
|
||||
|
||||
- Fix unintended window hiding in `nsSingleScratchpadPerWorkspace`.
|
||||
Only hide the previously active scratchpad.
|
||||
|
||||
## 0.18.1 (August 20, 2024)
|
||||
|
||||
### Breaking Changes
|
||||
|
@ -309,7 +309,7 @@ nsSingleScratchpadPerWorkspace :: NamedScratchpads -> X ()
|
||||
nsSingleScratchpadPerWorkspace scratches =
|
||||
nsHideOnCondition $ \ _lastFocus curFocus winSet hideScratch -> do
|
||||
allScratchesButCurrent <-
|
||||
filterM (liftA2 (<||>) (pure . (/= curFocus)) (`isNSP` scratches))
|
||||
filterM (liftA2 (<&&>) (pure . (/= curFocus)) (`isNSP` scratches))
|
||||
(W.index winSet)
|
||||
whenX (isNSP curFocus scratches) $
|
||||
for_ allScratchesButCurrent hideScratch
|
||||
|
Loading…
x
Reference in New Issue
Block a user