aboutsummaryrefslogtreecommitdiffstats
path: root/FindEmptyWorkspace.hs
diff options
context:
space:
mode:
Diffstat (limited to 'FindEmptyWorkspace.hs')
-rw-r--r--FindEmptyWorkspace.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/FindEmptyWorkspace.hs b/FindEmptyWorkspace.hs
index 4eced8c..4cc9775 100644
--- a/FindEmptyWorkspace.hs
+++ b/FindEmptyWorkspace.hs
@@ -50,7 +50,7 @@ import Operations
-- 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 sd -> Maybe (Workspace i a)
+findEmptyWorkspace :: StackSet i l a s sd -> Maybe (Workspace i l a)
findEmptyWorkspace = find (isNothing . stack) . allWorkspaces
where
allWorkspaces ss = (workspace . current) ss :