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 +--------
 pandoc.cabal          | 2 +-
 2 files changed, 2 insertions(+), 9 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
diff --git a/pandoc.cabal b/pandoc.cabal
index ad9ad7a5e..5c0f1b064 100644
--- a/pandoc.cabal
+++ b/pandoc.cabal
@@ -156,12 +156,12 @@ Library
     Other-Modules: Text.Pandoc.UTF8
   if flag(citeproc)
     Build-depends: citeproc-hs
+    Exposed-Modules: Text.Pandoc.Biblio
     cpp-options:   -D_CITEPROC
   Build-Depends: parsec < 3, xhtml, mtl, network, filepath, process, directory,
                  template-haskell, bytestring
   Hs-Source-Dirs:  .
   Exposed-Modules: Text.Pandoc,
-                   Text.Pandoc.Biblio,
                    Text.Pandoc.Blocks,
                    Text.Pandoc.Definition,
                    Text.Pandoc.CharacterReferences,
-- 
cgit v1.2.3