Revision 5006418e htest/Test/Ganeti/HTools/Node.hs

b/htest/Test/Ganeti/HTools/Node.hs
71 71 
                      mm * Types.unitDsk,
72 72 
                      mm * Types.unitCpu)
73 73 
          Nothing -> (maxMem, maxDsk, maxCpu)
74 
  name  <- getFQDN
74 
  name  <- genFQDN
75 75 
  mem_t <- choose (base_mem, top_mem)
76 76 
  mem_f <- choose (base_mem, mem_t)
77 77 
  mem_n <- choose (0, mem_t - mem_f)

Also available in: Unified diff