@@ -43,10 +43,10 @@ import Data.Aeson.Types (
4343import Data.Bifunctor (bimap , first )
4444import Data.Foldable (for_ , traverse_ )
4545import Data.Functor (void )
46+ import Data.List (find )
4647import Data.List.NonEmpty qualified as NonEmpty
4748import Data.Map.Strict qualified as Map
4849import Data.Maybe (catMaybes , fromMaybe , isJust )
49- import Data.List (find )
5050import Data.Set (Set )
5151import Data.Set qualified as Set
5252import Data.String.Conversion (toString , toText )
@@ -417,10 +417,10 @@ buildGraph meta = stripRoot . shrink isNotWorkspaceMember $
417417 isolatedWorkspaceMembers = Set. fromList $ map packageKey $ filter hasNoDependencies $ metadataWorkspaceMembers meta
418418 packageKey :: PackageId -> (Text , Text )
419419 packageKey pkg = (pkgIdName pkg, pkgIdVersion pkg)
420-
420+
421421 -- Check if a workspace member has no dependencies by looking at resolve nodes
422422 hasNoDependencies :: PackageId -> Bool
423- hasNoDependencies pkgId =
423+ hasNoDependencies pkgId =
424424 case find (\ node -> resolveNodeId node == pkgId) (resolvedNodes $ metadataResolve meta) of
425425 Just node -> null (resolveNodeDeps node)
426426 Nothing -> True -- If not found in resolve, assume no dependencies
0 commit comments