Revision f723de38
b/Ganeti/HTools/CLI.hs | ||
---|---|---|
296 | 296 |
os arch |
297 | 297 |
exitWith ExitSuccess |
298 | 298 |
return resu |
299 |
(_, _, errs) -> |
|
300 |
ioError (userError (concat errs ++ usageHelp progname options)) |
|
299 |
(_, _, errs) -> do |
|
300 |
hPutStrLn stderr $ "Command line error: " ++ concat errs |
|
301 |
hPutStrLn stderr $ usageHelp progname options |
|
302 |
exitWith $ ExitFailure 2 |
|
301 | 303 |
|
302 | 304 |
-- | Parse the environment and return the node\/instance names. |
303 | 305 |
-- |
Also available in: Unified diff