Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
argo
argotk
Commits
106eb84e
Commit
106eb84e
authored
Mar 22, 2019
by
Valentin Reis
Browse files
remove runProcess_
parent
7e98c73e
Pipeline
#6128
passed with stages
in 43 seconds
Changes
1
Pipelines
1
Hide whitespace changes
Inline
Side-by-side
src/Argo/Stack.hs
View file @
106eb84e
...
...
@@ -43,7 +43,6 @@ import Data.Text as T
import
Data.Traversable
(
for
)
import
System.Directory
import
System.Process.Typed
(
readProcessStdout_
,
runProcess_
,
runProcess
,
proc
,
shell
...
...
@@ -56,7 +55,9 @@ cleanLeftovers (WorkingDirectory wd) = do
putText
"Cleaning sockets."
for_
socklist
cleanSocket
putText
"Cleaning output directory."
runProcess_
(
shell
$
toS
$
"rm -rf "
<>
wd
)
runProcess
(
shell
$
toS
$
"rm -rf "
<>
wd
)
>>=
\
case
ExitSuccess
->
putText
"Cleaned output directory"
ExitFailure
_
->
putText
"Failed running rm -rf on the output directory."
where
socklist
=
[
"/tmp/nrm-downstream-in"
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment