diff options
Diffstat (limited to 'src/Zettel/Common.hs')
-rw-r--r-- | src/Zettel/Common.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Zettel/Common.hs b/src/Zettel/Common.hs index b44d129..f471321 100644 --- a/src/Zettel/Common.hs +++ b/src/Zettel/Common.hs @@ -38,7 +38,8 @@ refreshPandocMetaZettel zid z = z {zettelBody = refreshPandocMetaZettel' zid z . clearPandocAttr $ zettelBody z} refreshPandocMeta :: ZettelGraph -> ZettelGraph -refreshPandocMeta = ZettelGraph . Map.mapWithKey refreshPandocMetaZettel . unZettelGraph +refreshPandocMeta zg = ZettelGraph (Map.mapWithKey refreshPandocMetaZettel zg.unZettelGraph) + zg.zettelGraphBib parseIds :: Text -> Text parseIds t |