From aeaf5e5108de4e7ab20782cf753e4617df45d8a2 Mon Sep 17 00:00:00 2001
From: fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>
Date: Tue, 12 Aug 2008 01:23:17 +0000
Subject: 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
---
 Text/Pandoc/Biblio.hs | 9 +--------
 1 file changed, 1 insertion(+), 8 deletions(-)

(limited to 'Text')

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