diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2015-09-26 21:21:24 -0700 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2015-09-26 21:21:24 -0700 |
commit | 1931cf14ceac7a4ceda967ca53eabd40500d317e (patch) | |
tree | cdbc1eaddf90a3355e80e2e6df428164fafeaed2 /src/pandoc-citeproc-preamble.hs | |
parent | d87b87557527e67a3a8f74681f71cf69caa6bc89 (diff) | |
download | pandoc-citeproc-preamble-1931cf14ceac7a4ceda967ca53eabd40500d317e.tar.gz |
spacing
Diffstat (limited to 'src/pandoc-citeproc-preamble.hs')
-rw-r--r-- | src/pandoc-citeproc-preamble.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/pandoc-citeproc-preamble.hs b/src/pandoc-citeproc-preamble.hs index 6d26a81..9ce221b 100644 --- a/src/pandoc-citeproc-preamble.hs +++ b/src/pandoc-citeproc-preamble.hs @@ -21,7 +21,7 @@ doPreamble maybeFormat input@(Pandoc meta blocks) = lsBlock ls = RawBlock format ls format = maybe (Format "latex") id maybeFormat -findPreambleFile :: Format -> Meta -> IO (Maybe FilePath) +findPreambleFile :: Format -> Meta -> IO (Maybe FilePath) findPreambleFile (Format format) meta = case lookupMeta "citeproc-preamble" meta >>= toPath of metadataPreamble@(Just _) -> return metadataPreamble |