Revision 791e87b8 src/Ganeti/HTools/Backend/Luxi.hs
b/src/Ganeti/HTools/Backend/Luxi.hs | ||
---|---|---|
230 | 230 |
xcnos <- lvconvert 0 "cnos" cnos |
231 | 231 |
let node = flip Node.setNodeTags xtags $ |
232 | 232 |
Node.create xname xmtotal xmnode xmfree xdtotal xdfree |
233 |
xctotal xcnos (not live || xdrained) xsptotal xspfree xgdx xexcl_stor |
|
233 |
xctotal xcnos (not live || xdrained) xsptotal xspfree |
|
234 |
xgdx xexcl_stor |
|
234 | 235 |
return (xname, node) |
235 | 236 |
|
236 | 237 |
parseNode _ v = fail ("Invalid node query result: " ++ show v) |
Also available in: Unified diff