From 00986fa1a5c5c35b5633803a0e48fd0265d46795 Mon Sep 17 00:00:00 2001
From: DivadNojnarg <dgranjon@ymail.com>
Date: Fri, 26 Apr 2024 08:10:20 +0900
Subject: [PATCH] fix link animations

---
 inst/examples/strava/app.R                 | 37 +++++++++++++++++++---
 inst/examples/strava/pages/messages_page.R |  2 +-
 inst/examples/strava/pages/profile_page.R  |  2 +-
 inst/examples/strava/pages/settings_page.R |  2 +-
 4 files changed, 35 insertions(+), 8 deletions(-)

diff --git a/inst/examples/strava/app.R b/inst/examples/strava/app.R
index 12b67f36..26c24172 100644
--- a/inst/examples/strava/app.R
+++ b/inst/examples/strava/app.R
@@ -46,6 +46,7 @@ brochureApp(
         });"
       ),
       f7TabLink(
+        `data-animate` = "false",
         label = "Home",
         icon = f7Icon("house"),
         href = "/",
@@ -53,6 +54,7 @@ brochureApp(
         class = "link tab-link-active"
       ),
       f7TabLink(
+        `data-animate` = "false",
         label = "Maps",
         icon = f7Icon("map_pin_ellipse"),
         href = "/maps",
@@ -68,6 +70,7 @@ brochureApp(
         `data-sheet` = "#record"
       ),
       f7TabLink(
+        `data-animate` = "false",
         label = "Groups",
         icon = f7Icon("person_2_fill"),
         href = "/groups",
@@ -75,6 +78,7 @@ brochureApp(
         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
index a70a2fd9..53df66a6 100644
--- 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
index 7ee01c44..90b40442 100644
--- 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
index cf5f2698..7f0d55e7 100644
--- 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")
             )