diff options
| author | Andy Irving <andy@soundforsound.co.uk> | 2011-10-02 15:20:46 +0100 |
|---|---|---|
| committer | Andy Irving <andy@soundforsound.co.uk> | 2011-10-02 15:20:46 +0100 |
| commit | 24ce6878738ed8fc5e124c21e1ebfb4895f670e5 (patch) | |
| tree | 490319aa0cdb7f4601230b9ae6aeb123b0485bea /src/Hakyll/Web | |
| parent | 704bef94418f1e16b72ade8c0b81987c1496bd80 (diff) | |
| download | hakyll-24ce6878738ed8fc5e124c21e1ebfb4895f670e5.tar.gz | |
Don't relativize urls that lead with "//".
Used to reference absolute ath in another domain, without hardcoding protocol (so it works with http or https, and your browser won't complain about unsecure content)
Example: <script src="//ajax.googleapis.com/ajax/libs/jquery/1.6/jquery.min.js"></script>
Diffstat (limited to 'src/Hakyll/Web')
| -rw-r--r-- | src/Hakyll/Web/Urls/Relativize.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Hakyll/Web/Urls/Relativize.hs b/src/Hakyll/Web/Urls/Relativize.hs index f4b7a6c..0b7df4e 100644 --- a/src/Hakyll/Web/Urls/Relativize.hs +++ b/src/Hakyll/Web/Urls/Relativize.hs @@ -44,4 +44,4 @@ relativizeUrls :: String -- ^ Path to the site root -> String -- ^ Resulting HTML relativizeUrls root = withUrls rel where - rel x = if "/" `isPrefixOf` x then root ++ x else x + rel x = if "/" `isPrefixOf` x && not ("//" `isPrefixOf` x) then root ++ x else x |