pandoc: Don't strip path off of sourceURL.
We need this information for relative URLs!
This should resolve the continuing problem noted in #750.
commit482f7f8e157b713b5dcf81303844721d827b16de
authorJohn MacFarlane <jgm@berkeley.edu>
dateWed 6 Aug 2014, 14:36 (12 years ago)
parent56f2c61
pandoc.hs+1−2
@@ -1167,8 +1167,7 @@ main = do
11671167 (x:_) -> case parseURI x of
11681168 Just u
11691169 | uriScheme u `elem` ["http:","https:"] ->
1170− Just $ show u{ uriPath = "",
1171− uriQuery = "",
1170+ Just $ show u{ uriQuery = "",
11721171 uriFragment = "" }
11731172 _ -> Nothing
11741173