pandoc/test/rtf/image.native

Pandoc
  ( Meta { unMeta = fromList [] } )
  [ Para
    [ Image
      ( "", [], [ ( "width", "2.0in" ), ( "height", "2.0in" ) ] )
      [ Str "image" ]
      ( "f9d88c3dbe18f6a7f5670e994a947d51216cdf0e.jpg", "" )
    ]
  ]
Use pretty-simple to format native output. Previously we used our own homespun formatting. But this produces over-long lines that aren't ideal for diffs in tests. Easier to use something off-the-shelf and standard. Closes #7580. Performance is slower by about a factor of 10, but this isn't really a problem because native isn't suitable as a serialization format. (For serialization you should use json, because the reader is so much faster than native.) 2021-09-19 12:09:51 -07:00			`Pandoc`
			`( Meta { unMeta = fromList [] } )`
			`[ Para`
			`[ Image`
			`( "", [], [ ( "width", "2.0in" ), ( "height", "2.0in" ) ] )`
			`[ Str "image" ]`
			`( "f9d88c3dbe18f6a7f5670e994a947d51216cdf0e.jpg", "" )`
			`]`
			`]`