summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--Main.hs8
1 files changed, 4 insertions, 4 deletions
diff --git a/Main.hs b/Main.hs
index 024e869..714fe8d 100644
--- a/Main.hs
+++ b/Main.hs
@@ -127,6 +127,10 @@ handle e = trace (eventName e) -- return ()
-- ---------------------------------------------------------------------
-- Managing windows
+-- | spawn. Launch an external application
+spawn :: String -> W ()
+spawn = io_ . runCommand
+
--
-- | refresh. Refresh the currently focused window. Resizes to full
-- screen and raises the window.
@@ -178,10 +182,6 @@ unmanage w = do
focus :: Int -> W ()
focus n = withWindows (rotate n)
--- | spawn. Launch an external application
-spawn :: String -> W ()
-spawn = io_ . runCommand
-
-- | Kill the currently focused client
kill :: W ()
kill = do