diff options
| author | Alexander Krotov <ilabdsf@gmail.com> | 2017-11-01 13:31:16 +0300 |
|---|---|---|
| committer | Alexander Krotov <ilabdsf@gmail.com> | 2017-11-01 13:31:16 +0300 |
| commit | 3cee9c89768de064910deedbce3d8d28c1ffef84 (patch) | |
| tree | f30a17021e758064a90ad06994bbae729badbb27 /test/Tests/Writers | |
| parent | 8a5541dca88190e6fdf6ed9ff5c1c5c69c3c9710 (diff) | |
FB2 writer: Add "unrecognised" genre to <title-info>
XML schema requires at least one genre.
Diffstat (limited to 'test/Tests/Writers')
| -rw-r--r-- | test/Tests/Writers/FB2.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/test/Tests/Writers/FB2.hs b/test/Tests/Writers/FB2.hs index f0b96fa09..b4d11abf4 100644 --- a/test/Tests/Writers/FB2.hs +++ b/test/Tests/Writers/FB2.hs @@ -9,7 +9,7 @@ import Text.Pandoc.Builder fb2 :: String -> String fb2 x = "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n" ++ - "<FictionBook xmlns=\"http://www.gribuser.ru/xml/fictionbook/2.0\" xmlns:l=\"http://www.w3.org/1999/xlink\"><description><title-info /><document-info><program-used>pandoc</program-used></document-info></description><body><title><p /></title><section>" ++ x ++ "</section></body></FictionBook>" + "<FictionBook xmlns=\"http://www.gribuser.ru/xml/fictionbook/2.0\" xmlns:l=\"http://www.w3.org/1999/xlink\"><description><title-info><genre>unrecognised</genre></title-info><document-info><program-used>pandoc</program-used></document-info></description><body><title><p /></title><section>" ++ x ++ "</section></body></FictionBook>" infix 4 =: (=:) :: (ToString a, ToPandoc a) |