summaryrefslogtreecommitdiff
path: root/Propellor/CmdLine.hs
diff options
context:
space:
mode:
authorJoey Hess2014-03-31 12:17:58 -0400
committerJoey Hess2014-03-31 12:17:58 -0400
commitceab15aef5d23c9843c0593369b72038b5eb926d (patch)
treee218bfeb9717d25f8ee22ca6bfb1778a3661789c /Propellor/CmdLine.hs
parentffd1928b39695b2037c782ba48a7908ee6b27ada (diff)
propellor spin
Diffstat (limited to 'Propellor/CmdLine.hs')
-rw-r--r--Propellor/CmdLine.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Propellor/CmdLine.hs b/Propellor/CmdLine.hs
index fe16022c..09407a97 100644
--- a/Propellor/CmdLine.hs
+++ b/Propellor/CmdLine.hs
@@ -78,11 +78,11 @@ spin host = do
hPutStrLn stderr "SEND-KEYRING"
hFlush stderr
s <- readProcess "gpg" $ gpgopts ++ ["--export", "-a"]
- hPutStr toh $ toMarked keyringMarker s
+ hPutStrLn toh $ toMarked keyringMarker s
Just HaveKeyRing -> noop
hPutStrLn stderr "POST-KEYRING"
hFlush stderr
- hPutStr toh $ toMarked privDataMarker privdata
+ hPutStrLn toh $ toMarked privDataMarker privdata
hFlush toh
hClose fromh