[cli] refactor: rename CheckResults in CheckResultFor

Author: paolino

cli/src/User/Agent/Cli.hs

@@ -222,7 +222,7 @@ agentCmd = \case
             key
             slack
             $> Success
-    CheckResults tk emailUser emailPassword key days -> runValidate $ do
+    CheckResultFor tk emailUser emailPassword key days -> runValidate $ do
         mfact <- lift $ findFact tk key
         Fact testRun' _ <-
             liftMaybe (CheckResultsNoTestRunFor key) mfact
@@ -349,7 +349,7 @@ data AgentCommand (phase :: IsReady) result where
         -> AgentCommand
             phase
             (AValidationResult DownloadAssetsFailure Success)
-    CheckResults
+    CheckResultFor
         :: TokenId
         -> EmailUser
         -> EmailPassword

cli/src/User/Agent/Options.hs

@@ -97,7 +97,7 @@ emailResultsOptions
     :: Parser
         (AgentCommand NotReady (AValidationResult CheckResultsFailure Result))
 emailResultsOptions =
-    CheckResults
+    CheckResultFor
         <$> tokenIdOption
         <*> ( EmailUser
                 <$> setting