diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2022-07-27 08:40:31 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2022-07-27 08:40:31 -0700 |
| commit | 4ba72aaa2e5beb6b8b5bb300cc648313348b5af0 (patch) | |
| tree | 30fdf7ff7f36b90e339d00f6a77c9ab8c5ab8659 | |
| parent | 1f83f19c92b388c924957512c1ad8e1f1df87012 (diff) | |
Fix bug in filter example. Thanks to Jiří Wolker.
| -rw-r--r-- | doc/filters.md | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/doc/filters.md b/doc/filters.md index ce256a9f0..3be905c98 100644 --- a/doc/filters.md +++ b/doc/filters.md @@ -285,7 +285,7 @@ import qualified Data.Text as T doInclude :: Block -> IO Block doInclude cb@(CodeBlock (id, classes, namevals) contents) = - case lookup "include" namevals of + case lookup (T.pack "include") namevals of Just f -> CodeBlock (id, classes, namevals) <$> TIO.readFile (T.unpack f) Nothing -> return cb |