makeMain -> xmonad

darcs-hash:20071105031203-cba2c-0bf3d2d6e186ab307457f99b5b73afd333802e45

1 files changed, 2 insertions, 1 deletions

diff --git a/Main.hs b/Main.hs
index 0a24dba..8923555 100644
--- a/Main.hs
+++ b/Main.hs
@@ -31,7 +31,7 @@ main :: IO ()
 main = do
     handle (hPrint stderr) buildLaunch
     -- if buildLaunch returns, execute the trusted core
-    makeMain defaultConfig
+    xmonad defaultConfig
 
 -- | Build "~/.xmonad/Main.hs" with ghc, then execute it.  If there are no
 -- errors, this function does not return.  An exception is raised in any of
@@ -51,3 +51,4 @@ buildLaunch = do
     args <- getArgs
     executeFile (dir ++ "/Main") False args Nothing
     return ()
+