[cli] fix: formatting and formatting command

Fourmolu needs to converge

Author: paolino

cli/justfile

@@ -1,10 +1,14 @@
 # shellcheck shell=bash
 
+# shellcheck disable=SC2121
 set unstable := true
 
 format:
     #!/usr/bin/env bash
-    fourmolu -i src app test test-E2E test-lib CI/rewrite-libs
+    # shellcheck disable=SC2034
+    for i in {1..3}; do
+        fourmolu -i src app test test-E2E test-lib CI/rewrite-libs
+    done
     cabal-fmt -i anti.cabal CI/rewrite-libs/rewrite-libs.cabal
     nixfmt *.nix
     nixfmt nix/*.nix

cli/src/Oracle/Validate/Requests/TestRun/Create.hs

@@ -144,16 +144,17 @@ instance Monad m => ToJSON m TestRunRejection where
             $ "unacceptable try index. Expecting at most "
                 <> show maxIx
                 <> " run attempts for a given commit"
-    toJSON ( UnacceptableRole
+    toJSON
+        ( UnacceptableRole
                 (RegisterRoleKey _ (Repository org repo) (Username user))
             ) =
-        stringJSON
-            $ "unacceptable role. User "
-                <> show user
-                <> " has not been registered within the repository "
-                <> show org
-                <> "/"
-                <> show repo
+            stringJSON
+                $ "unacceptable role. User "
+                    <> show user
+                    <> " has not been registered within the repository "
+                    <> show org
+                    <> "/"
+                    <> show repo
     toJSON NoRegisteredKeyVerifiesTheSignature =
         stringJSON
             "there is no registered Ed25519 SSH key that can verify the signature"