From 36675bd20612fc75df97dda3a3c0d2a5b694f83c Mon Sep 17 00:00:00 2001 From: fiddlosopher Date: Sun, 28 Feb 2010 08:13:48 +0000 Subject: Added accessors (docTitle, docAuthors, docDate) to Meta type. git-svn-id: https://pandoc.googlecode.com/svn/trunk@1853 788f1e2b-df1e-0410-8736-df70ead52e1b --- src/Text/Pandoc/Definition.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'src') diff --git a/src/Text/Pandoc/Definition.hs b/src/Text/Pandoc/Definition.hs index 76d8712a0..02bf5efbb 100644 --- a/src/Text/Pandoc/Definition.hs +++ b/src/Text/Pandoc/Definition.hs @@ -36,9 +36,9 @@ import Data.Generics data Pandoc = Pandoc Meta [Block] deriving (Eq, Read, Show, Typeable, Data) -- | Bibliographic information for the document: title, authors, date. -data Meta = Meta [Inline] -- title - [[Inline]] -- list of authors - [Inline] -- 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