Skip to content

Commit a35700f

Browse files
committed
Make hlint happier
1 parent ba07321 commit a35700f

File tree

1 file changed

+3
-3
lines changed

1 file changed

+3
-3
lines changed

src/main/Main.hs

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -305,9 +305,9 @@ commandLineHandler currentDir progName isInterpreter = complicatedOptions
305305
addCommand' "unpack"
306306
"Unpack one or more packages locally"
307307
unpackCmd
308-
((,) <$> (some $ strArgument $ metavar "PACKAGE")
309-
<*> (optional $ textOption $ long "to" <>
310-
help "Optional path to unpack the package into"))
308+
((,) <$> some (strArgument $ metavar "PACKAGE")
309+
<*> optional (textOption $ long "to" <>
310+
help "Optional path to unpack the package into"))
311311
addCommand' "update"
312312
"Update the package index"
313313
updateCmd

0 commit comments

Comments
 (0)