Added comment/todo to SelfContained.

2013-04-10 10:22:00 -07:00 · 2013-04-10 10:22:00 -07:00 · dede39452f
commit dede39452f
parent da13ad89ce
1 changed files with 1 additions and 0 deletions
--- 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