Skip to content
Browse files

Use "c" instead of "v" for JSON contents of tagged element.

  • Loading branch information...
1 parent 3abbaf7 commit 6d228bc8e7e030df599b0491d2acb58698cafc0b John MacFarlane committed Oct 17, 2013
Showing with 1 addition and 1 deletion.
  1. +1 −1 Text/Pandoc/Definition.hs
View
2 Text/Pandoc/Definition.hs
@@ -263,7 +263,7 @@ jsonOpts = Aeson.Options{ Aeson.fieldLabelModifier = id
, Aeson.constructorTagModifier = id
, Aeson.allNullaryToStringTag = False
, Aeson.omitNothingFields = False
- , Aeson.sumEncoding = Aeson.TaggedObject "t" "v"
+ , Aeson.sumEncoding = Aeson.TaggedObject "t" "c"
}
toJSON' :: (Generic a, Aeson.GToJSON (Rep a))

0 comments on commit 6d228bc

Please sign in to comment.
Something went wrong with that request. Please try again.