Merge pull request #4269 from penpot/telemetry

✨ Improve internal naming of setup/props

frontend/src/app/util/router.cljs

@@ -7,8 +7,10 @@
 (ns app.util.router
   (:refer-clojure :exclude [resolve])
   (:require
+   [app.common.data.macros :as dm]
    [app.common.uri :as u]
    [app.config :as cf]
+   [app.main.data.events :as ev]
    [app.util.browser-history :as bhistory]
    [app.util.dom :as dom]
    [app.util.timers :as ts]
@@ -59,8 +61,13 @@
 (defn navigated
   [match]
   (ptk/reify ::navigated
-    IDeref
-    (-deref [_] match)
+    ev/Event
+    (-data [_]
+      (let [route  (dm/get-in match [:data :name])
+            params (get match :path-params)]
+        (assoc params
+               ::ev/name "navigate"
+               :route (name route))))
 
     ptk/UpdateEvent
     (update [_ state]