Revision 908c2f67 src/Ganeti/HTools/Backend/Luxi.hs

b/src/Ganeti/HTools/Backend/Luxi.hs
173 173 
  xdt <- convert "disk_template" disk_template
174 174 
  xsu <- convert "be/spindle_use" su
175 175 
  let inst = Instance.create xname xmem xdisk [xdisk] xvcpus
176 
             xrunning xtags xauto_balance xpnode snode xdt xsu
176 
             xrunning xtags xauto_balance xpnode snode xdt xsu []
177 177 
  return (xname, inst)
178 178 

  		





  179
  179
  
    
parseInstance _ v = fail ("Invalid instance query result: " ++ show v)


  		












Also available in:
  Unified diff