Merge pull request #1178 from jamesdbrock/master

sendMessage mhMetadata
This commit is contained in:
Vaibhav Sagar 2020-06-19 18:13:36 +08:00 committed by GitHub
commit cc427517a5
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

View File

@ -344,6 +344,6 @@ sendMessage debug hmackey sock msg = do
hdr = header msg
parentHeaderStr = maybe "{}" encodeStrict $ mhParentHeader hdr
idents = mhIdentifiers hdr
metadata = "{}"
metadata = let Metadata mdobject = mhMetadata hdr in encodeStrict mdobject
content = encodeStrict msg
headStr = encodeStrict hdr