CopyWindow.hs: type signature for copy

2025-07-25 17:21:51 -07:00 · 2007-10-13 09:01:22 +00:00
parent c3c2499052
commit af99f4b319
1 changed files with 1 additions and 0 deletions
--- a/CopyWindow.hs
+++ b/CopyWindow.hs
@@ -55,6 +55,7 @@ import StackSet
 -- %keybindlist     , (f, m) <- [(view, 0), (shift, shiftMask), (copy, shiftMask .|. controlMask)]]

 -- | copy. Copy a window to a new workspace.
+copy :: WorkspaceId -> WindowSet -> WindowSet
 copy n = copy'
    where copy' s = if n `tagMember` s && n /= tag (workspace (current s))
                    then maybe s (go s) (peek s)