Revision 0e09422b htools/Ganeti/HTools/Node.hs

b/htools/Ganeti/HTools/Node.hs
266 266
buildPeers t il =
267 267
    let mdata = map
268 268
                (\i_idx -> let inst = Container.find i_idx il
269
                               mem = if Instance.auto_balance inst
269
                               mem = if Instance.autoBalance inst
270 270
                                     then Instance.mem inst
271 271
                                     else 0
272 272
                           in (Instance.pNode inst, mem))
......
332 332
        new_dsk = fDsk t + Instance.dsk inst
333 333
        old_peers = peers t
334 334
        old_peem = P.find pnode old_peers
335
        new_peem =  if Instance.auto_balance inst
335
        new_peem =  if Instance.autoBalance inst
336 336
                    then old_peem - Instance.mem inst
337 337
                    else old_peem
338 338
        new_peers = if new_peem > 0
......
407 407
        old_peers = peers t
408 408
        old_mem = fMem t
409 409
        new_dsk = fDsk t - Instance.dsk inst
410
        secondary_needed_mem = if Instance.auto_balance inst
410
        secondary_needed_mem = if Instance.autoBalance inst
411 411
                               then Instance.mem inst
412 412
                               else 0
413 413
        new_peem = P.find pdx old_peers + secondary_needed_mem

Also available in: Unified diff