diff options
author | John MacFarlane <jgm@berkeley.edu> | 2021-09-28 21:17:53 -0700 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2021-09-28 21:17:53 -0700 |
commit | 0bdcf415e4eff83ad8e35c1d41c8a28e0bbd5da1 (patch) | |
tree | c9bda08418e67755254ad2d1d2e95dd691bd1902 /test/fb2/reader/titles.native | |
parent | 8018179b3df34cd7fdbd77c7a08b21fd8d5b5b31 (diff) | |
download | pandoc-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/titles.native')
-rw-r--r-- | test/fb2/reader/titles.native | 63 |
1 files changed, 34 insertions, 29 deletions
diff --git a/test/fb2/reader/titles.native b/test/fb2/reader/titles.native index f98d0b00c..74669d848 100644 --- a/test/fb2/reader/titles.native +++ b/test/fb2/reader/titles.native @@ -1,33 +1,38 @@ Pandoc - ( Meta { unMeta = fromList [] } ) - [ Header 1 - ( "", [], [] ) - [ Str "Body", Space, Str "title" ] + Meta { unMeta = fromList [] } + [ Header + 1 ( "" , [] , [] ) [ Str "Body" , Space , Str "title" ] , Div - ( "", [ "section" ], [] ) - [ Header 2 - ( "", [], [] ) - [ Str "Section", Space, Str "title" ] - , Div - ( "", [ "section" ], [] ) - [ Header 3 - ( "", [], [] ) - [ Str "Subsection" - , Space - , Str "title" - , LineBreak - , Str "with" - , Space - , Str "multiple" - , Space - , Str "paragraphs" - ] + ( "" , [ "section" ] , [] ) + [ Header + 2 ( "" , [] , [] ) [ Str "Section" , Space , Str "title" ] + , Div + ( "" , [ "section" ] , [] ) + [ Header + 3 + ( "" , [] , [] ) + [ Str "Subsection" + , Space + , Str "title" + , LineBreak + , Str "with" + , Space + , Str "multiple" + , Space + , Str "paragraphs" + ] + ] + , Div + ( "" , [ "section" ] , [] ) + [ Header + 3 + ( "" , [] , [] ) + [ Str "Another" + , Space + , Str "subsection" + , Space + , Str "title" + ] + ] ] - , Div - ( "", [ "section" ], [] ) - [ Header 3 - ( "", [], [] ) - [ Str "Another", Space, Str "subsection", Space, Str "title" ] - ] - ] ] |