summaryrefslogtreecommitdiffstats
path: root/Main.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Main.hs')
-rw-r--r--Main.hs7
1 files changed, 0 insertions, 7 deletions
diff --git a/Main.hs b/Main.hs
index bfa6247..71d7eb2 100644
--- a/Main.hs
+++ b/Main.hs
@@ -121,13 +121,6 @@ grabKeys dpy rootw = do
-- override_redirect member is True.
--
-safeFocus :: Window -> X ()
-safeFocus w = do ws <- gets workspace
- if W.member w ws
- then setFocus w
- else do b <- isRoot w
- when b setTopFocus
-
handle :: Event -> X ()
-- run window manager command