namesToWaitFor :: (TS m, MonadError JobError m) => [Job.Dependency] -> m (Set Job.Name)
namesToWaitFor = fmap (fromList . fmap (^. Job.depName)) . filterM shouldWaitFor
namesToWaitFor :: (TS m, MonadError JobError m) => [Job.Dependency] -> m (Set Job.Name)
namesToWaitFor = fmap (fromList . fmap (^. Job.depName)) . filterM shouldWaitFor
namesToWaitFor = fmap (fromList . fmap (^. Job.depName)) . filterM shouldWaitFor