From 96d4f941026a8eca3ba211facdc8ce66b2ab38bb Mon Sep 17 00:00:00 2001 From: "dr@jones.dk" Date: Mon, 22 Mar 2010 12:40:10 +0100 Subject: Imported Upstream version 1.5.0.1 --- src/Text/Pandoc/Definition.hs | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) (limited to 'src/Text/Pandoc/Definition.hs') diff --git a/src/Text/Pandoc/Definition.hs b/src/Text/Pandoc/Definition.hs index 94183c500..02bf5efbb 100644 --- a/src/Text/Pandoc/Definition.hs +++ b/src/Text/Pandoc/Definition.hs @@ -35,11 +35,10 @@ import Data.Generics data Pandoc = Pandoc Meta [Block] deriving (Eq, Read, Show, Typeable, Data) --- | Bibliographic information for the document: title (list of 'Inline'), --- authors (list of strings), date (string). -data Meta = Meta [Inline] -- title - [String] -- authors - String -- date +-- | Bibliographic information for the document: title, authors, date. +data Meta = Meta { docTitle :: [Inline] + , docAuthors :: [[Inline]] + , docDate :: [Inline] } deriving (Eq, Show, Read, Typeable, Data) -- | Alignment of a table column. -- cgit v1.2.3