f7SmartSelect hangs when openIn="popover"

[dietrichson]

Once you make a second choice the overlay does not disappear.

[dietrichson]

if (interactive()) {
  library(shiny)
  library(shinyMobile)

  shinyApp(
    ui = f7Page(
      title = "My app",
      f7SingleLayout(
        navbar = f7Navbar(title = "f7SmartSelect"),
        f7SmartSelect(
          inputId = "variable",
          label = "Choose a variable:",
          selected = "drat",
          choices = colnames(mtcars)[-1],
          openIn = "popover"
        ),
        tableOutput("data")
      )
    ),
    server = function(input, output) {
      output$data <- renderTable({
        mtcars[, c("mpg", input$variable), drop = FALSE]
      }, rownames = TRUE)
    }
  )
}

This is the example code from the help-file, with the openIn parameter changed.

[DivadNojnarg]

Thanks for the report:

Uncaught TypeError: Cannot read property 'trigger' of undefined
    at t.destroy (framework7.bundle.min.js:13)
    at t.onClose (framework7.bundle.min.js:13)
    at t.popoverClose (framework7.bundle.min.js:13)
    at framework7.bundle.min.js:13
    at Array.forEach (<anonymous>)
    at framework7.bundle.min.js:13
    at Array.forEach (<anonymous>)
    at t.EventsClass.emit (framework7.bundle.min.js:13)
    at t.onClose (framework7.bundle.min.js:13)
    at t.close (framework7.bundle.min.js:13)