From 23c6f56bc5bb5f7a994a60ccf1bb914366d74f81 Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Sat, 6 Nov 2010 14:58:54 -0700
Subject: Removed CITEPROC CPP conditionals from library code.

By Cabal policy, the API should not change depending on flags.
---
 src/Text/Pandoc/Parsing.hs          | 4 ----
 src/Text/Pandoc/Readers/Markdown.hs | 4 ----
 2 files changed, 8 deletions(-)

(limited to 'src/Text')

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
-- 
cgit v1.2.3