knitr, markdown - Add new lines before creating cell output div

cderv · cderv · commit 307cdf6f4bd0 · 2025-03-25T12:18:14.000+01:00
Otherwise this is not compatible with Pandoc's Markdown expecting empty new lines before a div
diff --git a/src/resources/rmd/hooks.R b/src/resources/rmd/hooks.R
@@ -407,10 +407,11 @@ knitr_hooks <- function(format, resourceDir, handledLanguages) {
     if (identical(options[["results"]], "asis") && !needCell) {
       x
     } else {
+      # Newline first and after to ensure Pandoc Fenced Div is correctly parsed
       paste0(
-        options[["indent"]], "::: {", 
+        options[["indent"]], "\n::: {", 
         labelId(label), paste(classes, collapse = " ") ,forwardAttr, "}\n", x, "\n", cell.cap ,
-        options[["indent"]], ":::"
+        options[["indent"]], ":::\n"
       )
     }
   })

Original file line number	Diff line number	Diff line change
`@@ -407,10 +407,11 @@ knitr_hooks <- function(format, resourceDir, handledLanguages) {`
`407`	`407`	`if (identical(options[["results"]], "asis") && !needCell) {`
`408`	`408`	`x`
`409`	`409`	`} else {`
	`410`	`+ # Newline first and after to ensure Pandoc Fenced Div is correctly parsed`
`410`	`411`	`paste0(`
`411`		`- options[["indent"]], "::: {",`
	`412`	`+ options[["indent"]], "\n::: {",`
`412`	`413`	`labelId(label), paste(classes, collapse = " ") ,forwardAttr, "}\n", x, "\n", cell.cap ,`
`413`		`- options[["indent"]], ":::"`
	`414`	`+ options[["indent"]], ":::\n"`
`414`	`415`	`)`
`415`	`416`	`}`
`416`	`417`	`})`