我想獲取元資料以及內容。
鑒于此降價文本：
---
title: The Title
---
just some content
這個函式提取Meta：
extractMeta :: Pandoc -> Meta
extractMeta (Pandoc meta _) = meta
我總是得到
Meta {unMeta = fromList []}
作為回應。
元資料塊似乎包含在其他地方：
Pandoc (Meta {unMeta = fromList []}) [HorizontalRule,Para [Str "title:",Space,Str "Something",SoftBreak,Str "id:",Space,Str "123123",SoftBreak,Str "---"],Para [Str "hi",Space,Str "this",Space,Str "is",Space,Str "the",Space,Str "first",Space,Str "blog",Space,Str "post"]]
有什么方法可以讓 Pandoc 使用其 Haskell API 決議 YAML 元資料？
謝謝。
完整代碼：
module Main where
import Data.Text (pack, Text)
import Text.Pandoc (def, readMarkdown, runIO, ReaderOptions (readerStandalone))
import Data.Functor ((<&>))
readAndPack :: FilePath -> IO Text
readAndPack = (<$>) pack . readFile . ( ) "posts/"
main :: IO ()
main = do
md <- readAndPack "binary.markdown"
pandoc <- runIO $ readMarkdown def { readerStandalone = True } md
print pandoc
uj5u.com熱心網友回復：
問題是：默認情況下未啟用 YAML 元資料。你需要Ext_yaml_metadata_block得到你想要的。這是一個按預期決議 YAML 元資料的完整代碼。
module Main where
import Data.Text (pack, Text)
import Text.Pandoc (def, readMarkdown, runIO, ReaderOptions (readerStandalone))
import Text.Pandoc.Extensions
import Text.Pandoc.Options
import Data.Functor ((<&>))
readAndPack :: FilePath -> IO Text
readAndPack = (<$>) pack . readFile . ( ) "posts/"
main :: IO ()
main = do
md <- readAndPack "binary.markdown"
pandoc <- runIO $
readMarkdown
(def {
readerStandalone = True,
readerExtensions =
enableExtension Ext_yaml_metadata_block (readerExtensions def) } )
md
print pandoc
這是輸出：
Right (Pandoc (Meta {unMeta = fromList [("title",MetaInlines [Str "The",Space,Str "Title"])]}) [Para [Str "just",Space,Str "some",Space,Str "content"]])
轉載請註明出處，本文鏈接：https://www.uj5u.com/caozuo/459671.html