aboutsummaryrefslogtreecommitdiff
path: root/src/Rahm/Desktop/Marking.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Rahm/Desktop/Marking.hs')
-rw-r--r--src/Rahm/Desktop/Marking.hs6
1 files changed, 0 insertions, 6 deletions
diff --git a/src/Rahm/Desktop/Marking.hs b/src/Rahm/Desktop/Marking.hs
index 90808cf..1ea9782 100644
--- a/src/Rahm/Desktop/Marking.hs
+++ b/src/Rahm/Desktop/Marking.hs
@@ -1,7 +1,6 @@
module Rahm.Desktop.Marking (
markCurrentWindow,
jumpToMark,
- moveLocationToWorkspace,
setAlternateWindows,
getAlternateWindows,
setAlternateWorkspace,
@@ -131,11 +130,6 @@ swapWithFocused winToSwap stackSet =
mapWindows (
\w -> if w == winToSwap then focused else w) stackSet
-moveLocationToWorkspace :: Location -> WorkspaceId -> X ()
-moveLocationToWorkspace (Location _ (Just win)) wid =
- windows $ shiftWin wid win
-moveLocationToWorkspace _ _ = return ()
-
windowRect :: Window -> X (Maybe Rectangle)
windowRect win = withDisplay $ \dpy -> (do
(_, x, y, w, h, bw, _) <- io $ getGeometry dpy win