diff --git a/cabal-install/src/Distribution/Client/ProjectConfig.hs b/cabal-install/src/Distribution/Client/ProjectConfig.hs
index aa20d71af12..f0b467c9b71 100644
--- a/cabal-install/src/Distribution/Client/ProjectConfig.hs
+++ b/cabal-install/src/Distribution/Client/ProjectConfig.hs
@@ -542,13 +542,13 @@ getProjectRootUsability filePath = do
   if exists
     then return ProjectRootUsabilityPresentAndUsable
     else do
-      let isUsableAciton =
+      let isUsableAction =
             handle @IOException
               -- NOTE: if any IOException is raised, we assume the file does not exist.
-              -- That is what happen when we call @pathIsSymbolicLink@ on an @FilePath@ that does not exist.
+              -- That is what happen when we call @pathIsSymbolicLink@ on a @FilePath@ that does not exist.
               (const $ pure False)
               ((||) <$> pathIsSymbolicLink filePath <*> doesPathExist filePath)
-      isUnusable <- isUsableAciton
+      isUnusable <- isUsableAction
       if isUnusable
         then return ProjectRootUsabilityPresentAndUnusable
         else return ProjectRootUsabilityNotPresent