diff --git a/src/Ganeti/HTools/Program/Hroller.hs b/src/Ganeti/HTools/Program/Hroller.hs index 356cea5b8ed9bed18edc39282100b0ea5126aeec..8269c88e15a010e92d0556f3bdb4f35c309bfa0b 100644 --- a/src/Ganeti/HTools/Program/Hroller.hs +++ b/src/Ganeti/HTools/Program/Hroller.hs @@ -137,8 +137,8 @@ main opts args = do Just grp -> return (Just grp) let nodes = IntMap.filter (foldl (liftA2 (&&)) (const True) - [ (not . Node.offline) - , (hasTag $ optNodeTags opts) + [ not . Node.offline + , hasTag $ optNodeTags opts , hasGroup wantedGroup ]) nlf