gdritter repos charter / 019367b
Fix some argument-order stuff Getty Ritter 3 years ago
1 changed file(s) with 3 addition(s) and 3 deletion(s). Collapse all Expand all
1717 | SetDescription T.Text
1818 | SetLicense T.Text
1919 | SetRoot T.Text
20 | AddMod T.Text
2021 | AddDep T.Text
2122 | AddUsualDeps
22 | AddMod T.Text
23 deriving (Eq, Show)
23 deriving (Eq, Show, Ord)
2424
2525 options :: [Opt.OptDescr Option]
2626 options =
6262
6363
6464 process :: [Option] -> C.Project -> C.Project
65 process opts p = foldr ($) p (map go opts)
65 process opts p = foldl (flip ($)) p (map go opts)
6666 where
6767 go (AddBinary n) proj =
6868 proj & C.binDetails %~ (C.mkBinary n :)