diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2010-11-06 14:58:54 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2010-11-06 14:58:54 -0700 |
| commit | 23c6f56bc5bb5f7a994a60ccf1bb914366d74f81 (patch) | |
| tree | 13e496115f40d31ce0a5a03414a94fa8df1745bc /src/Text/Pandoc | |
| parent | f7f6b2427d5bef595b819d30f16fb332397349d3 (diff) | |
| download | pandoc-23c6f56bc5bb5f7a994a60ccf1bb914366d74f81.tar.gz | |
Removed CITEPROC CPP conditionals from library code.
By Cabal policy, the API should not change depending on flags.
Diffstat (limited to 'src/Text/Pandoc')
| -rw-r--r-- | src/Text/Pandoc/Parsing.hs | 4 | ||||
| -rw-r--r-- | src/Text/Pandoc/Readers/Markdown.hs | 4 |
2 files changed, 0 insertions, 8 deletions
diff --git a/src/Text/Pandoc/Parsing.hs b/src/Text/Pandoc/Parsing.hs index dce99fd75..47e97c7cc 100644 --- a/src/Text/Pandoc/Parsing.hs +++ b/src/Text/Pandoc/Parsing.hs @@ -586,9 +586,7 @@ data ParserState = ParserState stateQuoteContext :: QuoteContext, -- ^ Inside quoted environment? stateSanitizeHTML :: Bool, -- ^ Sanitize HTML? stateKeys :: KeyTable, -- ^ List of reference keys -#ifdef _CITEPROC stateCitations :: [String], -- ^ List of available citations -#endif stateNotes :: NoteTable, -- ^ List of notes stateTabStop :: Int, -- ^ Tab stop stateStandalone :: Bool, -- ^ Parse bibliographic info? @@ -616,9 +614,7 @@ defaultParserState = stateQuoteContext = NoQuote, stateSanitizeHTML = False, stateKeys = M.empty, -#ifdef _CITEPROC stateCitations = [], -#endif stateNotes = [], stateTabStop = 4, stateStandalone = False, diff --git a/src/Text/Pandoc/Readers/Markdown.hs b/src/Text/Pandoc/Readers/Markdown.hs index 0256184f6..a2ee93f42 100644 --- a/src/Text/Pandoc/Readers/Markdown.hs +++ b/src/Text/Pandoc/Readers/Markdown.hs @@ -912,9 +912,7 @@ inlineParsers = [ str , note , inlineNote , link -#ifdef _CITEPROC , inlineCitation -#endif , image , math , strikeout @@ -1305,7 +1303,6 @@ rawHtmlInline' = do else anyHtmlInlineTag return $ HtmlInline result -#ifdef _CITEPROC inlineCitation :: GenParser Char ParserState Inline inlineCitation = try $ do failIfStrict @@ -1351,4 +1348,3 @@ parseLabel = try $ do (False,True ) -> AuthorOnly _ -> NormalCitation return $ Citation cit (trim p') (trim loc) mode 0 0 -#endif |