cadey
/
propellor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

description

This commit is contained in:
Joey Hess 2014-04-01 14:08:35 -04:00
parent 1dd454ebfa
commit 407f1b27fc
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
Propellor/Property/Cmd.hs
View File

@ -45,3 +45,4 @@ scriptProperty script = cmdProperty "sh" ["-c", shellcmd]
serviceRunning :: String -> Property
serviceRunning svc = scriptProperty
["service " ++ shellEscape svc ++ " start >/dev/null 2>&1 || true"]
`describe` ("running " ++ svc)