Make asis_output works for Quarto the same as results: asis

[cderv]

Related to

• [knitr] asis_output() has not the same effect as output: asis quarto-dev/quarto-cli#9185

Example

---
title: "Test"
format: 
  typst:
    keep-typ: true
    keep-md: true
---

```{r}
#| results: asis
knitr::asis_output("`#set page(flipped: true)`{=typst}")
```

Using asis_output() will not apply raw output here, because options$results = 'asis' us onlyfor LaTeX output

knitr/R/output.R

Lines 514 to 518 in 031e08c

	x = wrap_asis(x, options)
	if (!out_format('latex') || inline) return(x)
	# latex output need the \end{kframe} trick
	options$results = 'asis'
	knit_hooks$get('output')(x, options)

I think we need it for Quarto as the wrapping used will check for this value
https://github.com/quarto-dev/quarto-cli/blob/f43107222f70ca3579a520d496597b75b5bd0097/src/resources/rmd/patch.R#L116-L117