Widen notification popup in R Shiny?

Question

如何在R Shiny中扩大通知?现在它会切断较长的错误信息。

library(shiny)
ui <- fluidPage(
actionButton("test", "Test")
)
server <- function(input, output, session) {
observeEvent(input$test, {
showNotification("You did it! Now make me wider", type = "message")
})
}
shinyApp(ui, server)

Answer 1

调整闪亮通知宽度

/* Put shiny notifications front and center */
#shiny-notification-panel {
top: 0;
bottom: unset;
left: 0;
right: 0;
margin-left: auto;
margin-right: auto;
width: 100%;
max-width: 450px;
}