Fix error
This commit is contained in:
parent
fc5a532cf4
commit
13432dbb84
|
@ -11,12 +11,13 @@ let
|
||||||
main = do
|
main = do
|
||||||
(configDir:hostname:args) <- getArgs
|
(configDir:hostname:args) <- getArgs
|
||||||
paths <- myNixPath $ toText configDir
|
paths <- myNixPath $ toText configDir
|
||||||
say [i|Trying to build ${name} config for #{hostname} ...|]
|
|
||||||
let command = ${commandline}
|
let command = ${commandline}
|
||||||
bracket
|
bracket
|
||||||
(decodeUtf8 <$> ((mktemp |> captureTrim) :: IO ByteString))
|
(decodeUtf8 <$> (mktemp |> captureTrim))
|
||||||
rm
|
rm
|
||||||
(\logFile -> onException (command &> Append logFile &!> Append logFile) (cat logFile))
|
(\logFile -> do
|
||||||
|
say [i|Trying to build ${name} config for #{hostname}. Logging to #{logFile}.|]
|
||||||
|
onException (command &> Append logFile &!> Append logFile) (cat logFile))
|
||||||
say [i|Build of ${name} config for #{hostname} was successful.|]
|
say [i|Build of ${name} config for #{hostname} was successful.|]
|
||||||
'';
|
'';
|
||||||
in {
|
in {
|
||||||
|
|
Loading…
Reference in a new issue