summaryrefslogtreecommitdiff
path: root/src/Propellor/CmdLine.hs
diff options
context:
space:
mode:
authorJoey Hess2014-11-18 20:28:16 -0400
committerJoey Hess2014-11-18 20:28:16 -0400
commit2ad3334b26648157f7c7e2c584b3eaf99b9bce89 (patch)
tree4a35cfee5ec4ef255e4d4c8d16e6fb8f47326645 /src/Propellor/CmdLine.hs
parent04737b8975ad831f9f98b35956055800b265edff (diff)
propellor spin
Diffstat (limited to 'src/Propellor/CmdLine.hs')
-rw-r--r--src/Propellor/CmdLine.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Propellor/CmdLine.hs b/src/Propellor/CmdLine.hs
index 3cb6715e..ab6d8619 100644
--- a/src/Propellor/CmdLine.hs
+++ b/src/Propellor/CmdLine.hs
@@ -51,7 +51,7 @@ processCmdLine = go =<< getArgs
go ("--boot":h:[]) = return $ Update h -- for back-compat
go ("--continue":s:[]) = case readish s of
Just cmdline -> return $ Continue cmdline
- Nothing -> errorMessage "--continue serialization failure"
+ Nothing -> errorMessage $ "--continue serialization failure (" ++ s ++ ")"
go (h:[])
| "--" `isPrefixOf` h = usage
| otherwise = return $ Run h