tests/testthat/_snaps/attr-nodes.md

In ropensci/tinkr: Cast '(R)Markdown' Files to 'XML' and Back Again

protect_curly() works

Code
  cat(as.character(protect_curly(curly$body)))
Output
  <?xml version="1.0" encoding="UTF-8"?>
  <!DOCTYPE document SYSTEM "CommonMark.dtd">
  <document xmlns="http://commonmark.org/xml/1.0" sourcepos="1:1-16:20">
    <heading sourcepos="2:1-2:33" level="1">
      <text sourcepos="2:3-2:33" xml:space="preserve">preface </text>
      <text curly="true">{#pre-face .unnumbered}</text>
      <text/>
    </heading>
    <paragraph sourcepos="4:1-4:5">
      <text sourcepos="4:1-4:5" xml:space="preserve">hello</text>
    </paragraph>
    <paragraph sourcepos="6:1-6:51">
      <text sourcepos="6:1-6:51" xml:space="preserve">I like </text>
      <text curly="true">{xml2}</text>
      <text> but of course </text>
      <text curly="true">{tinkr}</text>
      <text> is even cooler!</text>
    </paragraph>
    <paragraph sourcepos="8:1-8:110">
      <text sourcepos="8:1-8:110" xml:space="preserve">Images that use pandoc style will have curlies with content that should be translated and should be protected.</text>
    </paragraph>
    <paragraph sourcepos="10:1-10:88">
      <image sourcepos="10:1-10:51" destination="https://placekitten.com/200/300" title="">
        <text sourcepos="10:3-10:17" xml:space="preserve">a pretty kitten</text>
      </image>
      <text sourcepos="10:52-10:88" xml:space="preserve"/>
      <text curly="true" alt="a picture of a kitten">{#kitteh alt='a picture of a kitten'}</text>
      <text/>
    </paragraph>
    <paragraph sourcepos="12:1-13:10">
      <image sourcepos="12:1-12:47" destination="https://placedog.net/200/300" title="">
        <text sourcepos="12:3-12:16" xml:space="preserve">a pretty puppy</text>
      </image>
      <text sourcepos="12:48-12:68" xml:space="preserve"/>
      <text curly="true" alt="a picture of a dog">{#dog alt="a picture
  of a dog"}</text>
      <text/>
      <softbreak/>
    </paragraph>
    <paragraph sourcepos="15:1-16:20">
      <text sourcepos="15:1-15:47" xml:space="preserve"/>
      <text asis="true">[</text>
      <text>a span with attributes</text>
      <text asis="true">]</text>
      <text/>
      <text curly="true">{.span-with-attributes
  style='color: red;'}</text>
      <text/>
      <softbreak/>
    </paragraph>
  </document>

ropensci/tinkr documentation built on May 18, 2024, 8:34 a.m.