diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2020-11-06 09:16:24 -0800 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2020-11-06 09:16:24 -0800 |
| commit | 535bd607ded20c9f598b7f68dc894c230bdeef1a (patch) | |
| tree | 4722626ed82ad7a1c1592fa7935650acaa0cb5e8 /src/Text | |
| parent | e6abf3b8ed5c244c295d603050bba06a244a51e2 (diff) | |
| download | pandoc-535bd607ded20c9f598b7f68dc894c230bdeef1a.tar.gz | |
Support nocase spansn for csljson output
Diffstat (limited to 'src/Text')
| -rw-r--r-- | src/Text/Pandoc/Writers/CslJson.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Writers/CslJson.hs b/src/Text/Pandoc/Writers/CslJson.hs index 02495799d..68cdb19fb 100644 --- a/src/Text/Pandoc/Writers/CslJson.hs +++ b/src/Text/Pandoc/Writers/CslJson.hs @@ -77,6 +77,7 @@ fromInline (Image _ ils _) = fromInlines ils fromInline (Note _) = CslEmpty fromInline (Span (_,[cl],_) ils) | "csl-" `T.isPrefixOf` cl = CslDiv cl (fromInlines ils) + | cl == "nocase" = CslNoCase (fromInlines ils) fromInline (Span _ ils) = fromInlines ils toCslJson :: Locale -> [Reference Inlines] -> ByteString |