Revision c8c071cb src/Ganeti/HTools/Backend/Rapi.hs
b/src/Ganeti/HTools/Backend/Rapi.hs | ||
---|---|---|
171 | 171 |
dtotal <- lvextract 0.0 "dtotal" |
172 | 172 |
dfree <- lvextract 0 "dfree" |
173 | 173 |
ctotal <- lvextract 0.0 "ctotal" |
174 |
cnos <- lvextract 0 "cnos" |
|
174 | 175 |
tags <- extract "tags" |
175 | 176 |
let node = flip Node.setNodeTags tags $ |
176 |
Node.create name mtotal mnode mfree dtotal dfree ctotal (not live)
|
|
177 |
sptotal spfree guuid' excl_stor |
|
177 |
Node.create name mtotal mnode mfree dtotal dfree ctotal cnos
|
|
178 |
(not live) sptotal spfree guuid' excl_stor
|
|
178 | 179 |
return (name, node) |
179 | 180 |
|
180 | 181 |
-- | Construct a group from a JSON object. |
Also available in: Unified diff