diff options
author | John MacFarlane <jgm@berkeley.edu> | 2013-04-10 10:22:00 -0700 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2013-04-10 10:22:00 -0700 |
commit | dede39452f9488002daa1b402eed8d25aa88994f (patch) | |
tree | 4930020ad27f959e6e2b7185fd56c74a39fc7faa /src/Text | |
parent | da13ad89cea34f68ef059783d49faa20e24d3c80 (diff) | |
download | pandoc-dede39452f9488002daa1b402eed8d25aa88994f.tar.gz |
Added comment/todo to SelfContained.
Diffstat (limited to 'src/Text')
-rw-r--r-- | src/Text/Pandoc/SelfContained.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/Text/Pandoc/SelfContained.hs b/src/Text/Pandoc/SelfContained.hs index 01e03c66a..c4613992a 100644 --- a/src/Text/Pandoc/SelfContained.hs +++ b/src/Text/Pandoc/SelfContained.hs @@ -74,6 +74,7 @@ convertTag userdata t@(TagOpen "link" as) = return $ TagOpen "link" (("href",enc) : [(x,y) | (x,y) <- as, x /= "href"]) convertTag _ t = return t +-- NOTE: This is really crude, it doesn't respect CSS comments. cssURLs :: Maybe FilePath -> FilePath -> ByteString -> IO ByteString cssURLs userdata d orig = case B.breakSubstring "url(" orig of |