diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2018-08-08 09:53:13 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2018-08-08 09:53:13 -0700 |
| commit | 9752dcd61aa72a9e1e59bafcd55376ab1d275620 (patch) | |
| tree | ebf5fc23f072b193c70868de47537dafa6b5513c /src/Text/Pandoc/Writers | |
| parent | 672804922542cc3d3a1719a2b4064ba91fccc6c8 (diff) | |
| download | pandoc-9752dcd61aa72a9e1e59bafcd55376ab1d275620.tar.gz | |
HTML writer: Don't prefix epub: attributes with data-.
Diffstat (limited to 'src/Text/Pandoc/Writers')
| -rw-r--r-- | src/Text/Pandoc/Writers/HTML.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Writers/HTML.hs b/src/Text/Pandoc/Writers/HTML.hs index f07d0381f..25f3163c2 100644 --- a/src/Text/Pandoc/Writers/HTML.hs +++ b/src/Text/Pandoc/Writers/HTML.hs @@ -580,6 +580,7 @@ toAttrs kvs = do return $ map (\(x,y) -> customAttribute (fromString (if not html5 || x `Set.member` html5Attributes + || "epub:" `isPrefixOf` x || "data-" `isPrefixOf` x then x else "data-" ++ x)) (toValue y)) kvs |