summaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/MediaBag.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2017-10-27 21:29:22 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2017-10-27 21:32:53 -0700
commitb201a8aa582e1146243796fac26e57579af55f5f (patch)
treecae58e93223b93ba09f701367b2f0dc95b4f1ad1 /src/Text/Pandoc/MediaBag.hs
parentf3e901c29d9a1ca82a1b35ea13df4e673e753443 (diff)
hlint changes.
Diffstat (limited to 'src/Text/Pandoc/MediaBag.hs')
-rw-r--r--src/Text/Pandoc/MediaBag.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/MediaBag.hs b/src/Text/Pandoc/MediaBag.hs
index f89c60c9e..1c15d1cee 100644
--- a/src/Text/Pandoc/MediaBag.hs
+++ b/src/Text/Pandoc/MediaBag.hs
@@ -80,4 +80,4 @@ lookupMedia fp (MediaBag mediamap) = M.lookup (splitDirectories fp) mediamap
mediaDirectory :: MediaBag -> [(String, MimeType, Int)]
mediaDirectory (MediaBag mediamap) =
M.foldrWithKey (\fp (mime,contents) ->
- (((Posix.joinPath fp), mime, fromIntegral $ BL.length contents):)) [] mediamap
+ ((Posix.joinPath fp, mime, fromIntegral $ BL.length contents):)) [] mediamap