Signed-off-by: Klaus Aehlig <aeh...@google.com> --- src/Ganeti/HTools/Cluster.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/src/Ganeti/HTools/Cluster.hs b/src/Ganeti/HTools/Cluster.hs index 811b0bf..e6556ea 100644 --- a/src/Ganeti/HTools/Cluster.hs +++ b/src/Ganeti/HTools/Cluster.hs @@ -938,7 +938,7 @@ findBestAllocGroup mggl mgnl mgil allowed_gdxs inst cnt = sortedSols = sortMGResults goodSols in case sortedSols of [] -> Bad $ if null groups' - then "no groups for evacuation: allowed groups was" ++ + then "no groups for evacuation: allowed groups was " ++ show allowed_gdxs ++ ", all groups: " ++ show (map fst groups) else intercalate ", " all_msgs -- 2.2.0.rc0.207.ga3a616c