webR + format: html: smooth-scroll: true makes shinylive not working

[pawelru]

I came up that the combination of shinylive and webR extensions together with format: html: smooth-scroll: true makes shinylive not working. Everything is fine if I don't specify smooth-scroll: true.

Please find minimal example below

1. Create dummy project
2. Install both extensions
3. Have the following:

• file: index.qmd

---
title: "Tmp_quarto_1"
filters:
  - shinylive
  - webr
format:
  html:
    smooth-scroll: true
    resources:
      - shinylive-sw.js
---

```{shinylive-r}
#| standalone: true
library(shiny)

shinyApp(
    ui = fluidPage(
        numericInput("n", "n", 1),
        plotOutput("plot")
    ),
    server = function(input, output) {
        output$plot <- renderPlot( plot(head(cars, input$n)) )
    }
)
```

```{webr-r}
fit = lm(mpg ~ am, data = mtcars)
summary(fit)
```

file: _quarto.yaml:

---
project:
  type: website

filters:
  - webr
  - shinylive