fix: Lints from hlint

myme · May 14, 2024 · ad5621e · ad5621e
1 parent 0a20410
commit ad5621e
Showing 1 changed file with 4 additions and 2 deletions.
diff --git a/src/Nixon/Config/Options.hs b/src/Nixon/Config/Options.hs
@@ -213,8 +213,10 @@ gcParser =
 
 newParser :: Parser NewOpts
 newParser =
-  NewOpts
-    <$> (fromMaybe "<name>" <$> optional (optText "name" 'n' "Command name"))
+  ( NewOpts
+      . fromMaybe "<name>"
+      <$> optional (optText "name" 'n' "Command name")
+  )
     <*> (fromMaybe "Description…" <$> optional (optText "desc" 'd' "Command description"))
     <*> (fromMaybe Lang.Bash <$> optional (opt parseLang "lang" 'l' "Language: bash, JavaScript, Haskell, ..."))
     <*> (fromMaybe "" <$> optional (optText "src" 's' "Command source code"))