diff options
Diffstat (limited to 'src/Text/Hakyll/File.hs')
| -rw-r--r-- | src/Text/Hakyll/File.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Hakyll/File.hs b/src/Text/Hakyll/File.hs index 15903c7..57571e4 100644 --- a/src/Text/Hakyll/File.hs +++ b/src/Text/Hakyll/File.hs @@ -34,7 +34,7 @@ import Text.Hakyll.Internal.FileType (isRenderableFile) removeLeadingSeparator :: FilePath -> FilePath removeLeadingSeparator [] = [] removeLeadingSeparator path - | head path' `elem` pathSeparators = tail path' + | head path' `elem` pathSeparators = drop 1 path' | otherwise = path' where path' = if "$root" `isPrefixOf` path then drop 5 path |