description
This commit is contained in:
parent
1dd454ebfa
commit
407f1b27fc
|
@ -45,3 +45,4 @@ scriptProperty script = cmdProperty "sh" ["-c", shellcmd]
|
||||||
serviceRunning :: String -> Property
|
serviceRunning :: String -> Property
|
||||||
serviceRunning svc = scriptProperty
|
serviceRunning svc = scriptProperty
|
||||||
["service " ++ shellEscape svc ++ " start >/dev/null 2>&1 || true"]
|
["service " ++ shellEscape svc ++ " start >/dev/null 2>&1 || true"]
|
||||||
|
`describe` ("running " ++ svc)
|
||||||
|
|
Loading…
Reference in New Issue