diff options
author | John MacFarlane <jgm@berkeley.edu> | 2014-07-31 09:42:53 -0700 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2014-07-31 09:42:53 -0700 |
commit | 76031f01c1a34b896688393fba8990044ba9cc64 (patch) | |
tree | 1ebe0cdd3687150cefc2404d25b50c235d0efbff /src/Text/Pandoc | |
parent | 143d5b732885a5186dd976ce1b74a91bcb417ead (diff) | |
parent | 31e7c1b67ccdb1b885a1305675095ebd28e65f6a (diff) | |
download | pandoc-76031f01c1a34b896688393fba8990044ba9cc64.tar.gz |
Merge pull request #1472 from mpickering/master
Shared: Added function insertMedia which is an alias for M.insert
Diffstat (limited to 'src/Text/Pandoc')
-rw-r--r-- | src/Text/Pandoc/Shared.hs | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Shared.hs b/src/Text/Pandoc/Shared.hs index 81aa6cf5a..ee48f5bc1 100644 --- a/src/Text/Pandoc/Shared.hs +++ b/src/Text/Pandoc/Shared.hs @@ -50,6 +50,7 @@ module Text.Pandoc.Shared ( tabFilter, -- * Media Handling MediaBag, + insertMedia, -- * Date/time normalizeDate, -- * Pandoc block and inline list processing @@ -292,9 +293,15 @@ tabFilter tabStop = --- -- | A map of media paths to their binary representations. - type MediaBag = M.Map String BL.ByteString +-- | Insert a media item into a `MediaBag` +insertMedia :: FilePath + -> BL.ByteString + -> MediaBag + -> MediaBag +insertMedia = M.insert + -- -- Date/time -- |