Revision e77bc89b htools/Ganeti/HTools/Program/Hbal.hs

b/htools/Ganeti/HTools/Program/Hbal.hs
351 351
      shownodes = optShowNodes opts
352 352
      showinsts = optShowInsts opts
353 353

  
354
  ini_cdata@(ClusterData gl fixed_nl ilf ctags _) <- loadExternalData opts
354
  ini_cdata@(ClusterData gl fixed_nl ilf ctags ipol) <- loadExternalData opts
355 355

  
356
  when (verbose > 1) $
356
  when (verbose > 1) $ do
357 357
       putStrLn $ "Loaded cluster tags: " ++ intercalate "," ctags
358
       putStrLn $ "Loaded cluster ipolicy: " ++ show ipol
358 359

  
359 360
  nlf <- setNodeStatus opts fixed_nl
360 361
  checkCluster verbose nlf ilf

Also available in: Unified diff