From 662af87f8da0191884bca131797290450d99f90f Mon Sep 17 00:00:00 2001
From: Don Stewart <dons@cse.unsw.edu.au>
Date: Thu, 8 Mar 2007 03:19:01 +0100
Subject: cleanup only

darcs-hash:20070308021901-9c5c1-35cd948050a53029805dfa1d699f7bb8c7df40de
---
 Main.hs | 8 ++++----
 1 file 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
-- 
cgit v1.2.3