fix link animations

RinteRface · Apr 25, 2024 · 00986fa · 00986fa
1 parent 9f25ba5
commit 00986fa
Show file tree

Hide file tree

Showing 4 changed files with 35 additions and 8 deletions.
diff --git a/inst/examples/strava/app.R b/inst/examples/strava/app.R
@@ -46,13 +46,15 @@ brochureApp(
         });"
       ),
       f7TabLink(
+        `data-animate` = "false",
         label = "Home",
         icon = f7Icon("house"),
         href = "/",
         # TO be routable
         class = "link tab-link-active"
       ),
       f7TabLink(
+        `data-animate` = "false",
         label = "Maps",
         icon = f7Icon("map_pin_ellipse"),
         href = "/maps",
@@ -68,13 +70,15 @@ brochureApp(
         `data-sheet` = "#record"
       ),
       f7TabLink(
+        `data-animate` = "false",
         label = "Groups",
         icon = f7Icon("person_2_fill"),
         href = "/groups",
         # TO be routable
         class = "link"
       ),
       f7TabLink(
+        `data-animate` = "false",
         label = "You",
         icon = f7Icon("graph_circle"),
         href = "/me",
@@ -87,11 +91,34 @@ brochureApp(
       theme = "ios",
       color = "deeporange",
       routes = list(
-        list(path = "/", url = "/", name = "home"),
-        list(path = "/me", url = "/me", name = "me", keepAlive = TRUE),
-        list(path = "/profile", url = "/profile", name = "profile", keepAlive = TRUE),
-        list(path = "/messages", url = "/messages", name = "messages", keepAlive = TRUE),
-        list(path = "/settings", url = "/settings", name = "settings", keepAlive = TRUE)
+        list(
+          path = "/",
+          url = "/",
+          name = "home"
+        ),
+        list(
+          path = "/me",
+          url = "/me",
+          name = "me",
+          keepAlive = TRUE
+        ),
+        list(
+          path = "/profile",
+          url = "/profile",
+          name = "profile",
+          keepAlive = TRUE
+        ),
+        list(
+          path = "/messages",
+          url = "/messages",
+          name = "messages",
+          keepAlive = TRUE
+        ),
+        list(
+          path = "/settings",
+          url = "/settings",
+          name = "settings", keepAlive = TRUE
+        )
       )
     )
   )

diff --git a/inst/examples/strava/pages/messages_page.R b/inst/examples/strava/pages/messages_page.R
@@ -23,7 +23,7 @@ messages_page <- function() {
           leftPanel = tagList(
             tags$a(
               href = "/",
-              class = "link",
+              class = "link back",
               tags$i(class = "icon icon-back"),
               tags$span("Home")
             )

diff --git a/inst/examples/strava/pages/profile_page.R b/inst/examples/strava/pages/profile_page.R
@@ -9,7 +9,7 @@ profile_page <- function() {
           leftPanel = tagList(
             tags$a(
               href = "/me",
-              class = "link",
+              class = "link back",
               tags$i(class = "icon icon-back"),
               tags$span("You")
             )

diff --git a/inst/examples/strava/pages/settings_page.R b/inst/examples/strava/pages/settings_page.R
@@ -9,7 +9,7 @@ settings_page <- function() {
           leftPanel = tagList(
             tags$a(
               href = "/me",
-              class = "link",
+              class = "link back",
               tags$i(class = "icon icon-back"),
               tags$span("You")
             )