Lint

wireapp · Feb 5, 2025 · c4cf6d5 · c4cf6d5
1 parent b498280
commit c4cf6d5
Showing 1 changed file with 21 additions and 25 deletions.
diff --git a/app/upload-bom.hs b/app/upload-bom.hs
@@ -61,32 +61,28 @@ data CliOptions = CliOptions
 cliParser :: Maybe String -> Parser CliOptions
 cliParser mbApiKey =
   CliOptions
-    <$> ( strOption
-            ( long "project-name"
-                <> short 'p'
-                <> metavar "PROJECT_NAME"
-                <> value "wire-server-ci"
-            )
-        )
-    <*> ( strOption
-            ( long "project-version"
-                <> short 'v'
-                <> metavar "PROJECT_VERSION"
-            )
-        )
-    <*> ( switch
-            ( long "auto-create"
-                <> short 'c'
-            )
-        )
+    <$> strOption
+      ( long "project-name"
+          <> short 'p'
+          <> metavar "PROJECT_NAME"
+          <> value "wire-server-ci"
+      )
+    <*> strOption
+      ( long "project-version"
+          <> short 'v'
+          <> metavar "PROJECT_VERSION"
+      )
+    <*> switch
+      ( long "auto-create"
+          <> short 'c'
+      )
     <*> apiKeyOption
-    <*> ( strOption
-            ( long "bom-file"
-                <> short 'f'
-                <> metavar "BOM_FILENAME"
-                <> value "sbom.json"
-            )
-        )
+    <*> strOption
+      ( long "bom-file"
+          <> short 'f'
+          <> metavar "BOM_FILENAME"
+          <> value "sbom.json"
+      )
   where
     apiKeyOption :: Parser String
     apiKeyOption = case mbApiKey of