diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2015-10-28 10:02:55 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2015-10-28 10:06:40 -0700 |
| commit | fb1843ecdeea5131ea4ed27adc1124e13ae1c5d9 (patch) | |
| tree | 6a32feb016eb62d2a929bc541958fe765ae8e05f | |
| parent | 1d53d452c3a2ac81bcf9bd40f31c40a0656706a2 (diff) | |
| download | pandoc-fb1843ecdeea5131ea4ed27adc1124e13ae1c5d9.tar.gz | |
Fixed omitted `url(...)` in CSS data-uri with `--self-contained`.
Fixes #2489.
| -rw-r--r-- | src/Text/Pandoc/SelfContained.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/SelfContained.hs b/src/Text/Pandoc/SelfContained.hs index 4f4b6057b..390a7a21a 100644 --- a/src/Text/Pandoc/SelfContained.hs +++ b/src/Text/Pandoc/SelfContained.hs @@ -135,7 +135,7 @@ pCSSUrl media sourceURL d = P.try $ do 'd':'a':'t':'a':':':_ -> return fallback u -> do let url' = if isURI u then u else d </> u enc <- lift $ getDataURI media sourceURL "" url' - return (B.pack enc) + return (B.pack $ "url(" ++ enc ++ ")") getDataURI :: MediaBag -> Maybe String -> MimeType -> String |