aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2010-02-28 08:13:48 +0000
committerfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2010-02-28 08:13:48 +0000
commit36675bd20612fc75df97dda3a3c0d2a5b694f83c (patch)
tree56b6c1dbf76ce501e73a84e2ca84c1014306cd10 /src
parent76ab88807e2a6e2161343f8b0a3d01a8a22e9d99 (diff)
downloadpandoc-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.hs6
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.