diff options
Diffstat (limited to '')
-rw-r--r-- | Main.hs | 3 |
1 files changed, 1 insertions, 2 deletions
@@ -16,7 +16,6 @@ module Main (main) where import XMonad -import Control.Exception (handle) import System.IO import System.Info import System.Environment @@ -31,7 +30,7 @@ import qualified Properties main :: IO () main = do args <- getArgs - let launch = handle (hPrint stderr) buildLaunch >> xmonad defaultConfig + let launch = catchIO buildLaunch >> xmonad defaultConfig case args of [] -> launch ["--resume", _] -> launch |