diff options
author | John MacFarlane <jgm@berkeley.edu> | 2015-11-12 13:27:41 -0800 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2015-11-12 13:27:41 -0800 |
commit | c80c0df1fef118d32118dce222b204ae1f7b7f8b (patch) | |
tree | e3bff572fa0f59cf2c9a05160595367955570991 /src/Text/Pandoc | |
parent | 83b1aa042d72cdb7790eec1de5d86bf2bded60db (diff) | |
download | pandoc-c80c0df1fef118d32118dce222b204ae1f7b7f8b.tar.gz |
EPUB writer: don't download linked media when `data-external` attribute set.
By default pandoc downloads all linked media and includes it in the
EPUB container. This can be disabled by setting `data-external`
on the tags linking to media that should not be downloaded.
Example:
<audio controls="1">
<source src="http://www.sixbarsjail.it/tmp/bach_toccata.mp3"
type="audio/mpeg"></source>
</audio>
Closes #2473.
Diffstat (limited to 'src/Text/Pandoc')
-rw-r--r-- | src/Text/Pandoc/Writers/EPUB.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/EPUB.hs b/src/Text/Pandoc/Writers/EPUB.hs index 2843f8c74..42f3d5e57 100644 --- a/src/Text/Pandoc/Writers/EPUB.hs +++ b/src/Text/Pandoc/Writers/EPUB.hs @@ -816,7 +816,8 @@ transformTag :: WriterOptions -> Tag String -> IO (Tag String) transformTag opts mediaRef tag@(TagOpen name attr) - | name `elem` ["video", "source", "img", "audio"] = do + | name `elem` ["video", "source", "img", "audio"] && + lookup "data-external" attr == Nothing = do let src = fromAttrib "src" tag let poster = fromAttrib "poster" tag newsrc <- modifyMediaRef opts mediaRef src |