From f94cfaef066b5ef44615e9c526910b96ffa2a41e Mon Sep 17 00:00:00 2001 From: Don Stewart Date: Mon, 5 Nov 2007 04:12:03 +0100 Subject: makeMain -> xmonad darcs-hash:20071105031203-cba2c-0bf3d2d6e186ab307457f99b5b73afd333802e45 --- Main.hs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'Main.hs') 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 () + -- cgit v1.2.3