Support for extensible state in contrib modules.

2025-07-31 04:01:52 -07:00 · 2009-11-06 11:50:50 +00:00
parent 44bc9558d9
commit 73e406f4a6
5 changed files with 61 additions and 18 deletions
--- a/Main.hs
+++ b/Main.hs
@@ -39,7 +39,7 @@ main = do
    let launch = catchIO buildLaunch >> xmonad defaultConfig
    case args of
        []                    -> launch
-        ["--resume", _]       -> launch
+        ("--resume":_)        -> launch
        ["--help"]            -> usage
        ["--recompile"]       -> recompile True >>= flip unless exitFailure
        ["--restart"]         -> sendRestart >> return ()