diff options
Diffstat (limited to 'FindEmptyWorkspace.hs')
| -rw-r--r-- | FindEmptyWorkspace.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/FindEmptyWorkspace.hs b/FindEmptyWorkspace.hs index 2240d41..5cb3964 100644 --- a/FindEmptyWorkspace.hs +++ b/FindEmptyWorkspace.hs @@ -46,7 +46,7 @@ import qualified Operations as O -- Nothing if all workspaces are in use. Function searches currently -- focused workspace, other visible workspaces (when in Xinerama) and -- hidden workspaces in this order. -findEmptyWorkspace :: StackSet i a s -> Maybe (Workspace i a) +findEmptyWorkspace :: StackSet i a s sd -> Maybe (Workspace i a) findEmptyWorkspace = find (isNothing . stack) . allWorkspaces where allWorkspaces ss = (workspace . current) ss : |