subscript text is converted to strikethrough text

[zkamvar]

This may be a commonmark problem but it appears that it treats a single pair of ~ as strikethrough text even though it prints a double pair.

txt <- "log~10~"
xml <- tinkr::yarn$new(textConnection(txt))
xml$show()
#> log~~10~~

xml$body |> as.character() |> writeLines()
#> <?xml version="1.0" encoding="UTF-8"?>
#> <!DOCTYPE document SYSTEM "CommonMark.dtd">
#> <document xmlns="http://commonmark.org/xml/1.0">
#>   <paragraph>
#>     <text xml:space="preserve">log</text>
#>     <strikethrough>
#>       <text xml:space="preserve">10</text>
#>     </strikethrough>
#>   </paragraph>
#> </document>

^{Created on 2023-06-19 with reprex v2.0.2}

[zkamvar]

This was first observed in https://github.com/datacarpentry/R-ecology-lesson/issues/859

[zkamvar]

I've opened https://github.com/r-lib/commonmark/pull/31 to fix this upstream, but the downside is that tildes will be escaped :/