diff --git a/cabal-install/Distribution/Client/ProjectBuilding.hs b/cabal-install/Distribution/Client/ProjectBuilding.hs
index 61f9fee5aa5e60a5b7c694d72e04b5e64165a491..30c4ff4a31b11a072840fbd8aa9c4b2b3febb611 100644
--- a/cabal-install/Distribution/Client/ProjectBuilding.hs
+++ b/cabal-install/Distribution/Client/ProjectBuilding.hs
@@ -1131,13 +1131,14 @@ hasValidHaddockTargets ElaboratedConfiguredPackage{..}
     components = elabBuildTargets ++ elabTestTargets ++ elabBenchTargets 
               ++ maybeToList elabReplTarget ++ elabHaddockTargets
 
-    componentHasHaddocks (ComponentTarget name _) 
-        | CLibName      <- name =                           hasHaddocks
-        | CSubLibName _ <- name = elabHaddockInternal    && hasHaddocks
-        | CFLibName   _ <- name = elabHaddockForeignLibs && hasHaddocks
-        | CExeName    _ <- name = elabHaddockExecutables && hasHaddocks
-        | CTestName   _ <- name = elabHaddockTestSuites  && hasHaddocks
-        | CBenchName  _ <- name = elabHaddockBenchmarks  && hasHaddocks
+    componentHasHaddocks (ComponentTarget name _) = 
+      case name of
+        CLibName      ->                           hasHaddocks
+        CSubLibName _ -> elabHaddockInternal    && hasHaddocks
+        CFLibName   _ -> elabHaddockForeignLibs && hasHaddocks
+        CExeName    _ -> elabHaddockExecutables && hasHaddocks
+        CTestName   _ -> elabHaddockTestSuites  && hasHaddocks
+        CBenchName  _ -> elabHaddockBenchmarks  && hasHaddocks
       where 
         hasHaddocks = not (null (elabPkgDescription ^. componentModules name))