summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-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