fix nested progress meters when using git-annex-shell fallback

Caused an ugly blank line when the first progress meter was not used,
but also it may have confused -J display.

Remote/P2P.hs

@@ -51,8 +51,8 @@ chainGen addr r u c gc = do
 		{ uuid = u
 		, cost = cst
 		, name = Git.repoDescribe r
-		, storeKey = store protorunner
-		, retrieveKeyFile = retrieve protorunner
+		, storeKey = store (const protorunner)
+		, retrieveKeyFile = retrieve (const protorunner)
 		, retrieveKeyFileCheap = \_ _ _ -> return False
 		, removeKey = remove protorunner
 		, lockContent = Just $ lock withconn runProtoConn u