pandoc-types 1.12.1.1 → 1.12.1.2

raw patch · 2 files changed

+6/−2 lines, 2 files

Files

• Text/Pandoc/Definition.hs +5/−1
• pandoc-types.cabal +1/−1

@@ -108,6 +108,7 @@ docTitle :: Meta -> [Inline] docTitle meta =   case lookupMeta "title" meta of+         Just (MetaString s)           -> [Str s]          Just (MetaInlines ils)        -> ils          Just (MetaBlocks [Plain ils]) -> ils          Just (MetaBlocks [Para ils])  -> ils@@ -118,16 +119,19 @@ docAuthors :: Meta -> [[Inline]] docAuthors meta =   case lookupMeta "author" meta of+        Just (MetaString s)    -> [[Str s]]         Just (MetaInlines ils) -> [ils]         Just (MetaList   ms)   -> [ils | MetaInlines ils <- ms] ++                                   [ils | MetaBlocks [Plain ils] <- ms] ++-                                  [ils | MetaBlocks [Para ils]  <- ms]+                                  [ils | MetaBlocks [Para ils]  <- ms] +++                                  [[Str x] | MetaString x <- ms]         _                      -> []  -- | Extract date from metadata; works just like the old @docDate@. docDate :: Meta -> [Inline] docDate meta =   case lookupMeta "date" meta of+         Just (MetaString s)           -> [Str s]          Just (MetaInlines ils)        -> ils          Just (MetaBlocks [Plain ils]) -> ils          Just (MetaBlocks [Para ils])  -> ils

@@ -1,5 +1,5 @@ Name:                pandoc-types-Version:             1.12.1.1+Version:             1.12.1.2 Synopsis:            Types for representing a structured document Description:         @Text.Pandoc.Definition@ defines the 'Pandoc' data                      structure, which is used by pandoc to represent