diff options
author | John MacFarlane <jgm@berkeley.edu> | 2020-09-19 15:58:28 -0700 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2020-09-19 16:00:22 -0700 |
commit | d5a7abd47f0862c51bc7ce8349e4290ad1c24546 (patch) | |
tree | c51cff5dc705b74975dae7877ab1fc5193821d90 /src/Text/Pandoc/Readers/Markdown.hs | |
parent | 277ea0df3db147c5253e74abb12a913be10c9937 (diff) | |
download | pandoc-d5a7abd47f0862c51bc7ce8349e4290ad1c24546.tar.gz |
Change deprecated Builder.isNull to null.
Diffstat (limited to 'src/Text/Pandoc/Readers/Markdown.hs')
-rw-r--r-- | src/Text/Pandoc/Readers/Markdown.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Readers/Markdown.hs b/src/Text/Pandoc/Readers/Markdown.hs index 866b074c7..083131a05 100644 --- a/src/Text/Pandoc/Readers/Markdown.hs +++ b/src/Text/Pandoc/Readers/Markdown.hs @@ -222,9 +222,9 @@ pandocTitleBlock = try $ do author' <- author date' <- date return $ - (if B.isNull title' then id else B.setMeta "title" title') + (if null title' then id else B.setMeta "title" title') . (if null author' then id else B.setMeta "author" author') - . (if B.isNull date' then id else B.setMeta "date" date') + . (if null date' then id else B.setMeta "date" date') $ nullMeta updateState $ \st -> st{ stateMeta' = stateMeta' st <> meta' } |