summaryrefslogtreecommitdiff
path: root/Text/Pandoc
diff options
context:
space:
mode:
authorfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2008-08-12 01:23:17 +0000
committerfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2008-08-12 01:23:17 +0000
commitaeaf5e5108de4e7ab20782cf753e4617df45d8a2 (patch)
tree45ed15fad0db030479a7715074fd099432277d31 /Text/Pandoc
parent17a41e6ebcb818c996ea6eeda4ac1e24e12ee08a (diff)
Don't expose Text.Pandoc.Biblio module unless citeproc option is selected.
git-svn-id: https://pandoc.googlecode.com/svn/trunk@1408 788f1e2b-df1e-0410-8736-df70ead52e1b
Diffstat (limited to 'Text/Pandoc')
-rw-r--r--Text/Pandoc/Biblio.hs9
1 files changed, 1 insertions, 8 deletions
diff --git a/Text/Pandoc/Biblio.hs b/Text/Pandoc/Biblio.hs
index 3b1c06aeb..0e6fa1908 100644
--- a/Text/Pandoc/Biblio.hs
+++ b/Text/Pandoc/Biblio.hs
@@ -1,4 +1,4 @@
-{-# LANGUAGE PatternGuards, CPP #-}
+{-# LANGUAGE PatternGuards #-}
{-
Copyright (C) 2008 Andrea Rossato <andrea.rossato@ing.unitn.it>
@@ -27,7 +27,6 @@ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
Portability : portable
-}
-#ifdef _CITEPROC
module Text.Pandoc.Biblio ( processBiblio ) where
import Control.Monad ( when )
@@ -35,11 +34,6 @@ import Data.List
import Text.CSL
import Text.Pandoc.Definition
-#else
-module Text.Pandoc.Biblio () where
-#endif
-
-#ifdef _CITEPROC
-- | Process a 'Pandoc' document by adding citations formatted
-- according to a CSL style, using 'citeproc' from citeproc-hs.
processBiblio :: String -> [Reference] -> Pandoc -> IO Pandoc
@@ -70,4 +64,3 @@ processCite cs il
getCite :: Inline -> [[(String,String)]]
getCite i | Cite t _ <- i = [t]
| otherwise = []
-#endif