aboutsummaryrefslogtreecommitdiff
path: root/Utils.hs
diff options
context:
space:
mode:
authorMirek Kratochvil <exa.exa@gmail.com>2023-05-27 20:19:11 +0200
committerMirek Kratochvil <exa.exa@gmail.com>2023-05-27 20:19:11 +0200
commit35837f5607986b18746590c1611927d59cbe8c87 (patch)
tree1b4332816c000d2e442af747fd7ec4ff151ff5b9 /Utils.hs
parent919e953d2035836cf537beb31610e7b2edce8833 (diff)
downloadreploy-35837f5607986b18746590c1611927d59cbe8c87.tar.gz
reploy-35837f5607986b18746590c1611927d59cbe8c87.tar.bz2
render tags, run head-first into template problems
Diffstat (limited to 'Utils.hs')
-rw-r--r--Utils.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Utils.hs b/Utils.hs
index f95351e..c220cb7 100644
--- a/Utils.hs
+++ b/Utils.hs
@@ -26,7 +26,7 @@ hasSuffix s = isJust . stripSuffix s
second :: (a -> b) -> (c, a) -> (c, b)
second f (a, b) = (a, f b)
--- | A pandoc walker for printing the URLs.
+-- | A pandoc walker for modifying the URLs.
walkURLs :: (FilePath -> Site FilePath) -> Text.Pandoc.Definition.Pandoc -> Site Text.Pandoc.Definition.Pandoc
walkURLs f = Text.Pandoc.Walk.walkM go
where