Revision d25643d1 htools/Ganeti/HTools/Luxi.hs
b/htools/Ganeti/HTools/Luxi.hs | ||
---|---|---|
131 | 131 |
xtags <- convert "tags" tags |
132 | 132 |
xauto_balance <- convert "auto_balance" auto_balance |
133 | 133 |
let inst = Instance.create xname xmem xdisk xvcpus |
134 |
xrunning xtags xauto_balance xpnode snode |
|
134 |
xrunning xtags xauto_balance xpnode snode DTDrbd8
|
|
135 | 135 |
return (xname, inst) |
136 | 136 |
|
137 | 137 |
parseInstance _ v = fail ("Invalid instance query result: " ++ show v) |
Also available in: Unified diff