From 8cd7b7943c1da147a939fb70a8c2c3c08eaf197b Mon Sep 17 00:00:00 2001 From: Daniel Wagner Date: Tue, 9 Aug 2011 21:52:50 +0200 Subject: recognize the --replace option Ignore-this: 144ecf69bf57464f0de5a68837142190 darcs-hash:20110809195250-76d51-7d0cc80aecc162339ac6323bad61d5813500d4f0 --- Main.hs | 1 + 1 file changed, 1 insertion(+) (limited to 'Main.hs') diff --git a/Main.hs b/Main.hs index 239fb2a..cd076b5 100644 --- a/Main.hs +++ b/Main.hs @@ -43,6 +43,7 @@ main = do ("--resume":_) -> launch ["--help"] -> usage ["--recompile"] -> recompile True >>= flip unless exitFailure + ["--replace"] -> launch ["--restart"] -> sendRestart >> return () ["--version"] -> putStrLn $ unwords shortVersion ["--verbose-version"] -> putStrLn . unwords $ shortVersion ++ longVersion -- cgit v1.2.3