From f01ae6730186fbf052aad188b634bfd88bda92cf Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Mon, 31 Mar 2014 15:06:16 -0400
Subject: [PATCH] propellor spin

---
 Propellor/CmdLine.hs | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/Propellor/CmdLine.hs b/Propellor/CmdLine.hs
index c522468..44faa94 100644
--- a/Propellor/CmdLine.hs
+++ b/Propellor/CmdLine.hs
@@ -154,6 +154,8 @@ boot props = do
 	makePrivDataDir
 	maybe noop (writeFileProtected privDataLocal) $
 		fromMarked privDataMarker reply
+	print $ eitherToMaybe . B64.decode . BL.pack . s2w8 =<< fromMarked keyringMarker reply
+	print $ B64.decode . BL.pack . s2w8 <$> fromMarked keyringMarker reply
 	case eitherToMaybe . B64.decode . BL.pack . s2w8 =<< fromMarked keyringMarker reply of
 		Nothing -> noop
 		Just d -> do