summaryrefslogtreecommitdiff
path: root/src/Propellor
diff options
context:
space:
mode:
Diffstat (limited to 'src/Propellor')
-rw-r--r--src/Propellor/Spin.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Propellor/Spin.hs b/src/Propellor/Spin.hs
index 36859fb7..49d80460 100644
--- a/src/Propellor/Spin.hs
+++ b/src/Propellor/Spin.hs
@@ -15,6 +15,7 @@ import System.Posix.Directory
import Control.Concurrent.Async
import qualified Data.ByteString as B
import qualified Data.Set as S
+import qualified Data.Map as M
import Network.Socket (getAddrInfo, defaultHints, AddrInfo(..), AddrInfoFlag(..), SockAddr)
import Propellor.Base
@@ -208,7 +209,7 @@ updateServer target relay hst connect haveprecompiled getprivdata =
(Just NeedPrivData) -> do
print "START GET PRIVDATA"
pd <- getprivdata
- print "GOT PRIVDATA"
+ print ("GOT PRIVDATA", M.size pd)
sendPrivData hn toh pd
loop
(Just NeedGitClone) -> do