microfixes

This commit is contained in:
Mirek Kratochvil 2023-10-16 19:38:44 +02:00
parent e2cec0c7a7
commit 0e89ba2cf9
2 changed files with 3 additions and 2 deletions

View file

@ -72,7 +72,8 @@ rendering machinery.
- `mount` (string): what should be the canonical URL of the page
- `name` (string): the name of the page for display in templates and page links
(technically, the `name` is not required UNLESS you
(technically, the `name` is not required UNLESS you refer to it from the
templates, but the templates usually do that)
##### Optional

View file

@ -55,7 +55,7 @@ sourceTagMetaFile fp = do
kx = splitTag ks
v
| Y.String t <- v' =
Y.Object $ KM.fromList [("name", Y.String t)]
Y.object [("name", Y.String t)]
| Y.Object _ <- v' = v'
| otherwise =
error ("invalid definition of tag " ++ ks ++ " in " ++ fp)