Allow markdown extensions

This commit is contained in:
Reynir Björnsson 2024-10-28 16:22:51 +01:00
parent 72e797e6e6
commit a2722c0947

View file

@ -518,7 +518,7 @@ struct
Pipeline.track_file Source.binary
>>> Yocaml_yaml.Pipeline.read_file_with_metadata (module Article) file
>>* (fun (obj, str) -> Eff.return (obj#with_host host, str))
>>> Yocaml_cmarkit.content_to_html ()
>>> Yocaml_cmarkit.content_to_html ~strict:false ()
>>> Yocaml_jingoo.Pipeline.as_template
(module Article)
(Source.template "article.html")
@ -559,7 +559,7 @@ struct
>>> Yocaml_jingoo.Pipeline.as_template ~strict:true
(module Articles)
(Source.template "layout.html")
>>> Yocaml_cmarkit.content_to_html ()
>>> Yocaml_cmarkit.content_to_html ~strict:false ()
>>> drop_first ()
end
@ -570,7 +570,7 @@ struct
begin
Pipeline.track_files [ Source.binary; file ]
>>> Yocaml_yaml.Pipeline.read_file_with_metadata (module Page) file
>>> Yocaml_cmarkit.content_to_html ()
>>> Yocaml_cmarkit.content_to_html ~strict:false ()
>>> Yocaml_jingoo.Pipeline.as_template ~strict:true
(module Page)
(Source.template "layout.html")
@ -612,7 +612,7 @@ struct
>>> Yocaml_jingoo.Pipeline.as_template ~strict:true
(module Articles)
(Source.template "layout.html")
>>> Yocaml_cmarkit.content_to_html ()
>>> Yocaml_cmarkit.content_to_html ~strict:false ()
>>> drop_first ()
end