server <- function(input, output, session, db) {
  if (is.null(db$token)) {
    output$main_content <- renderUI(
      shiny::div(
        class = "text-center py-5",
        shiny::tags$p(class = "mb-3", "Bitte zuerst anmelden."),
        shiny::tags$a(href = "/", class = "btn btn-primary", "Zur Anmeldung")
      )
    )
    return()
  }

  output$main_content <- renderUI(screen_home_ui("s_home"))
  screen_home_server("s_home", db = db)
}