Tissevert/pandoc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 1

Org reader: use tag-name attribute instead of data-tag-name.

Browse source
This commit is contained in:
John MacFarlane 2017-08-09 09:26:57 -07:00
parent 09b7df472d
commit 96933c6043
2 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/Text/Pandoc/Readers/Org/DocumentTree.hs
View file

@ -274,7 +274,7 @@ tagsToInlines tags =
-- | Wrap the given inline in a span, marking it as a tag.
tagSpan :: Tag -> Inlines -> Inlines
tagSpan t = B.spanWith ("", ["tag"], [("data-tag-name", fromTag t)])
tagSpan t = B.spanWith ("", ["tag"], [("tag-name", fromTag t)])

2
test/Tests/Readers/Org.hs
View file

@ -32,7 +32,7 @@ simpleTable' n = table "" (replicate n (AlignDefault, 0.0))
-- | Create a span for the given tag.
tagSpan :: String -> Inlines
tagSpan t = spanWith ("", ["tag"], [("data-tag-name", t)]) . smallcaps $ str t
tagSpan t = spanWith ("", ["tag"], [("tag-name", t)]) . smallcaps $ str t
tests :: [TestTree]
tests =