mirror of https://github.com/voidlizard/hbs2
wip
This commit is contained in:
parent
cf63dbaa94
commit
a54fcb6ade
3
Makefile
3
Makefile
|
@ -19,15 +19,12 @@ BINS := \
|
||||||
hbs2 \
|
hbs2 \
|
||||||
hbs2-peer \
|
hbs2-peer \
|
||||||
hbs2-keyman \
|
hbs2-keyman \
|
||||||
hbs2-fixer \
|
|
||||||
hbs2-git-subscribe \
|
hbs2-git-subscribe \
|
||||||
hbs2-git-dashboard \
|
|
||||||
git-remote-hbs2 \
|
git-remote-hbs2 \
|
||||||
git-hbs2 \
|
git-hbs2 \
|
||||||
hbs2-cli \
|
hbs2-cli \
|
||||||
hbs2-sync \
|
hbs2-sync \
|
||||||
fixme-new \
|
fixme-new \
|
||||||
hbs2-storage-simple-benchmarks \
|
|
||||||
hbs2-git3 \
|
hbs2-git3 \
|
||||||
git-remote-hbs23 \
|
git-remote-hbs23 \
|
||||||
|
|
||||||
|
|
|
@ -133,7 +133,6 @@
|
||||||
)
|
)
|
||||||
)
|
)
|
||||||
|
|
||||||
|
|
||||||
(println "preparing dirs")
|
(println "preparing dirs")
|
||||||
(rm local-dirs)
|
(rm local-dirs)
|
||||||
(mkdir local-dirs)
|
(mkdir local-dirs)
|
||||||
|
|
|
@ -86,17 +86,12 @@ runProcAttached cmd args = do
|
||||||
|
|
||||||
runProcess processConfig
|
runProcess processConfig
|
||||||
|
|
||||||
|
|
||||||
runProcQuiet :: forall m . MonadIO m
|
runProcQuiet :: forall m . MonadIO m
|
||||||
=> FilePath
|
=> FilePath
|
||||||
-> [String]
|
-> [String]
|
||||||
-> m ExitCode
|
-> m ExitCode
|
||||||
runProcQuiet cmd args = do
|
runProcQuiet cmd args = do
|
||||||
let config = setStdout createPipe $ setStderr createPipe $ setStdout createPipe $ proc cmd args
|
let config = setStdout createPipe $ setStderr createPipe $ setStdout createPipe $ proc cmd args
|
||||||
-- let processConfig = setStdout closed
|
|
||||||
-- $ setStderr closed
|
|
||||||
-- $ proc cmd args
|
|
||||||
|
|
||||||
runProcess config
|
runProcess config
|
||||||
|
|
||||||
pipeProcText :: forall m . MonadIO m
|
pipeProcText :: forall m . MonadIO m
|
||||||
|
|
Loading…
Reference in New Issue