aboutsummaryrefslogtreecommitdiff
path: root/test/fb2/reader/epigraph.native
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2021-09-28 21:17:53 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2021-09-28 21:17:53 -0700
commit0bdcf415e4eff83ad8e35c1d41c8a28e0bbd5da1 (patch)
treec9bda08418e67755254ad2d1d2e95dd691bd1902 /test/fb2/reader/epigraph.native
parent8018179b3df34cd7fdbd77c7a08b21fd8d5b5b31 (diff)
downloadpandoc-0bdcf415e4eff83ad8e35c1d41c8a28e0bbd5da1.tar.gz
Switch from pretty-simple to pretty-show for native output.
Update tests. Reason: it turns out that the native output generated by pretty-simple isn't always readable by the native reader. According to https://github.com/cdepillabout/pretty-simple/issues/99 it is not a design goal of the library that the rendered values be readable using 'read'. This makes it unsuitable for our purposes. pretty-show is a bit slower and it uses 4-space indents (non-configurable), but it doesn't have this serious drawback.
Diffstat (limited to 'test/fb2/reader/epigraph.native')
-rw-r--r--test/fb2/reader/epigraph.native24
1 files changed, 12 insertions, 12 deletions
diff --git a/test/fb2/reader/epigraph.native b/test/fb2/reader/epigraph.native
index 2eaa6da41..eb11c1d79 100644
--- a/test/fb2/reader/epigraph.native
+++ b/test/fb2/reader/epigraph.native
@@ -1,18 +1,18 @@
Pandoc
- ( Meta { unMeta = fromList [] } )
+ Meta { unMeta = fromList [] }
[ Div
- ( "", [ "epigraph" ], [] )
- [ Para [ Str "Body", Space, Str "epigraph" ] ]
+ ( "" , [ "epigraph" ] , [] )
+ [ Para [ Str "Body" , Space , Str "epigraph" ] ]
, Div
- ( "", [ "section" ], [] )
- [ Div
- ( "", [ "epigraph" ], [] )
- [ Para [ Str "Section", Space, Str "epigraph" ] ]
- , Div
- ( "", [ "section" ], [] )
+ ( "" , [ "section" ] , [] )
[ Div
- ( "", [ "epigraph" ], [] )
- [ Para [ Str "Subsection", Space, Str "epigraph" ] ]
+ ( "" , [ "epigraph" ] , [] )
+ [ Para [ Str "Section" , Space , Str "epigraph" ] ]
+ , Div
+ ( "" , [ "section" ] , [] )
+ [ Div
+ ( "" , [ "epigraph" ] , [] )
+ [ Para [ Str "Subsection" , Space , Str "epigraph" ] ]
+ ]
]
- ]
]