unfortunately I discovered another bad bug after the previous release…

…: spaces in headers of verbatim code blocks were not restored

DESCRIPTION

@@ -1,7 +1,7 @@
 Package: markdown
 Type: Package
 Title: Render Markdown with 'commonmark'
-Version: 1.10.1
+Version: 1.10.2
 Authors@R: c(
    person("Yihui", "Xie", role = c("aut", "cre"), email = "[email protected]", comment = c(ORCID = "0000-0003-0645-5666")),
    person("JJ", "Allaire", role = "aut"),

NEWS.md

@@ -1,5 +1,6 @@
 # CHANGES IN markdown VERSION 1.11
 
+- Verbatim code blocks of the form ```` ```{lang attr1 attr2 ...} ```` were not correctly rendered.
 
 # CHANGES IN markdown VERSION 1.10
 

R/render.R

@@ -188,7 +188,7 @@ mark = function(
     text = match_replace(text, r4, function(x) {
       x1 = sub(r4, '\\1', x)
       x2 = sub(r4, '\\2', x)
-      x2 = gsub(' ', id4, x2)
+      x2 = gsub(' ', id4, x2, fixed = TRUE)
       paste0(x1, x2)
     })
   }
@@ -232,6 +232,8 @@ mark = function(
       z2 = ifelse(i, sub('^class="', '', z2), paste0('"', z2))
       paste0(z1, z2, '>')
     }, 'html', function(z2) gsub(id4, ' ', restore_html(z2)))
+    # some code blocks with "attributes" are verbatim ones
+    ret = match_replace(ret, '```+\\{.+}', function(x) gsub(id4, ' ', x, fixed = TRUE))
     # auto identifiers
     if (isTRUE(options[['auto_identifiers']])) ret = auto_identifier(ret)
     # number sections

inst/examples/render-options.R

@@ -58,6 +58,7 @@ cat(mark('```{.r}\n1 + 1;\n```'))
 cat(mark('```{.r .js}\n1 + 1;\n```'))
 cat(mark('```{.r .js #foo}\n1 + 1;\n```'))
 cat(mark('```{.r .js #foo style="color:red;"}\n1 + 1;\n```'))
+cat(mark('````\n```{r, echo=TRUE}\n1 + 1;\n```\n````'))
 
 # raw blocks
 cat(mark('```{=html}\n<p>raw HTML</p>\n```'))

tests/tests.Rout.save

@@ -145,6 +145,12 @@ Content Cell  | Content Cell</p>
 <pre><code class="language-r js" id="foo" style="color:red;">1 + 1;
 </code></pre>
 
+> cat(mark("````\n```{r, echo=TRUE}\n1 + 1;\n```\n````"))
+<pre><code>```{r, echo=TRUE}
+1 + 1;
+```
+</code></pre>
+
 > cat(mark("```{=html}\n<p>raw HTML</p>\n```"))
 <p>raw HTML</p>