diff --git a/Cabal/src/Distribution/Simple/Glob.hs b/Cabal/src/Distribution/Simple/Glob.hs index 87d80bebadb..2586ddd68e0 100644 --- a/Cabal/src/Distribution/Simple/Glob.hs +++ b/Cabal/src/Distribution/Simple/Glob.hs @@ -339,6 +339,6 @@ splitConstantPrefix = unfoldr' step step (GlobFinal pat) = Left pat -isRecursiveInRoot :: Glob ->Bool +isRecursiveInRoot :: Glob -> Bool isRecursiveInRoot (GlobFinal (FinalMatch Recursive _ _)) = True isRecursiveInRoot _ = False