diff options
author | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2010-02-28 08:13:48 +0000 |
---|---|---|
committer | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2010-02-28 08:13:48 +0000 |
commit | 36675bd20612fc75df97dda3a3c0d2a5b694f83c (patch) | |
tree | 56b6c1dbf76ce501e73a84e2ca84c1014306cd10 /src | |
parent | 76ab88807e2a6e2161343f8b0a3d01a8a22e9d99 (diff) | |
download | pandoc-36675bd20612fc75df97dda3a3c0d2a5b694f83c.tar.gz |
Added accessors (docTitle, docAuthors, docDate) to Meta type.
git-svn-id: https://pandoc.googlecode.com/svn/trunk@1853 788f1e2b-df1e-0410-8736-df70ead52e1b
Diffstat (limited to 'src')
-rw-r--r-- | src/Text/Pandoc/Definition.hs | 6 |
1 files changed, 3 insertions, 3 deletions
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. |