cleanup only

darcs-hash:20070308021901-9c5c1-35cd948050a53029805dfa1d699f7bb8c7df40de.gz

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