Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Change default of one argument to be the working dir

  • Loading branch information...
commit ba85582722239979efa10669d37767814df2bafb 1 parent cdfffe8
@kolmodin kolmodin authored
Showing with 1 addition and 1 deletion.
  1. +1 −1  Main.hs
View
2  Main.hs
@@ -45,7 +45,7 @@ main = do
let (packages_file, wd) =
case args of
[] -> (Nothing, ".")
- [pf] -> (Just pf, ".")
+ [wd] -> (Nothing, wd)
[pf,wd] -> (Just pf, wd)
packages <-
case packages_file of
Please sign in to comment.
Something went wrong with that request. Please try again.