nemesis 2013.7.27 → 2014.5.19
raw patch · 2 files changed
+10/−12 lines, 2 filesdep +air-thdep ~airPVP ok
version bump matches the API change (PVP)
Dependencies added: air-th
Dependency ranges changed: air
API changes (from Hackage documentation)
Files
- nemesis.cabal +6/−8
- src/System/Nemesis.hs +4/−4
nemesis.cabal view
@@ -1,5 +1,5 @@ Name: nemesis-Version: 2013.7.27+Version: 2014.5.19 Build-type: Simple Synopsis: a task management tool for Haskell Description: Organize common shell tasks into a meaningful tree like structure with dependency tracking@@ -20,7 +20,7 @@ , test/N1.hs , test/N2.hs , test/N3.hs- + source-repository head type: git location: https://github.com/nfjinjing/nemesis.git@@ -32,18 +32,16 @@ , mtl , process , containers- , air >= 2013.7.18+ , air >= 2014.5.19+ , air-th , dlist , Glob , directory- + hs-source-dirs: src/- exposed-modules: + exposed-modules: System.Nemesis System.Nemesis.DSL System.Nemesis.Env other-modules: System.Nemesis.Util- - -
src/System/Nemesis.hs view
@@ -72,14 +72,14 @@ case args of [] -> help _target:_ -> execStateT unit def {target = _target} >>= run_nemesis- + where help = execStateT unit def >>= list_task list_task n = do let _tasks = n.tasks.elems- + _task_len = _tasks.map (full_name > length) .maximum + 5- + br n.tasks.elems.sort.map (show_with_ljust _task_len) .mapM_ putStrLn br@@ -110,7 +110,7 @@ where bye = do printf "%s does not exist!" s- + run_task :: Task -> IO () run_task t = t.deps.mapM_ run' >> t.action.unShowIO