diff --git a/app.R b/app.R
index e2879da..71dbe00 100644
--- a/app.R
+++ b/app.R
@@ -229,7 +229,8 @@ ui <- f7Page(
         icon = f7Icon("hammer_fill"),
         f7Segment(
           f7Button(inputId = "res_beaches", label = "Beaches"),
-          f7Button(inputId = "res_links",   label = "Links")
+          f7Button(inputId = "res_links",   label = "Links"),
+          f7Button(inputId = "res_restart", label = "Restart")
         ),
         uiOutput("resources_content")
       )
@@ -268,6 +269,7 @@ server <- function(input, output, session) {
   res_section <- reactiveVal("beaches")
   observeEvent(input$res_beaches, { res_section("beaches") })
   observeEvent(input$res_links,   { res_section("links") })
+  observeEvent(input$res_restart, { res_section("restart") })
 
   output$resources_content <- renderUI({
     if (res_section() == "beaches") {