Revision 76b62028 htools/Ganeti/HTools/Program/Hbal.hs

b/htools/Ganeti/HTools/Program/Hbal.hs
205 205 
            case jids of
206 206 
              Bad x -> return $ Bad x
207 207 
              Ok x -> do
208 
                putStrLn $ "Got job IDs " ++ commaJoin x
208 
                putStrLn $ "Got job IDs " ++ commaJoin (map show x)
209 209 
                waitForJobs client x
210 210 
         )
211 211 
  case jrs of

Also available in: Unified diff