summaryrefslogtreecommitdiff
path: root/Propellor/Property/Cmd.hs
diff options
context:
space:
mode:
authorJoey Hess2014-04-03 02:27:17 -0400
committerJoey Hess2014-04-03 02:27:17 -0400
commitfdb48b1dd11b802d0c2124fb3833672ca87ab870 (patch)
tree6537cfb4d2211eaf478411ca95cec56dbe706bcc /Propellor/Property/Cmd.hs
parent9a9f249ff0cfe2b5f601c84368457245ddb4d78b (diff)
api doc improvements
Diffstat (limited to 'Propellor/Property/Cmd.hs')
-rw-r--r--Propellor/Property/Cmd.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Propellor/Property/Cmd.hs b/Propellor/Property/Cmd.hs
index 1f668daf..dc5073d3 100644
--- a/Propellor/Property/Cmd.hs
+++ b/Propellor/Property/Cmd.hs
@@ -41,7 +41,7 @@ scriptProperty script = cmdProperty "sh" ["-c", shellcmd]
shellcmd = intercalate " ; " ("set -e" : script)
-- | A property that can satisfied by running a series of shell commands,
--- as user (staring in their home directory).
+-- as user (cd'd to their home directory).
userScriptProperty :: UserName -> [String] -> Property
userScriptProperty user script = cmdProperty "su" ["-c", shellcmd, user]
where