Revision ffc18bb2 src/Ganeti/HTools/Program/Hscan.hs
b/src/Ganeti/HTools/Program/Hscan.hs | ||
---|---|---|
159 | 159 |
|
160 | 160 |
results <- mapM (\name -> Rapi.loadData name >>= writeData nlen name opts) |
161 | 161 |
clusters |
162 |
unless (all id results) $ exitWith (ExitFailure 2) |
|
162 |
unless (and results) $ exitWith (ExitFailure 2) |
Also available in: Unified diff