fix: Get back metrics by using old specific Receive log method (#56)

.vscode/tasks.json

@@ -25,7 +25,8 @@
         "${workspaceFolder}\\tests",
         "--prettyPrint"
       ],
-      "problemMatcher": []
+      "problemMatcher": [],
+      "dependsOn": ["build"]
     }
   ]
 }

Speckle.query.pq

@@ -1,2 +1,2 @@
 // Use this file to write queries to test your data connector
-let result = Speckle.GetByUrl("https://latest.speckle.dev/streams/c1faab5c62/commits/aefb7a5fff") in result
+let result = Speckle.GetByUrl("https://latest.speckle.dev/streams/4e51c4025f/commits/766c20c5fb") in result

speckle/api/Api.CommitReceived.pqm

@@ -1,6 +1,6 @@
 let
     Speckle.Api.Fetch = Extension.LoadFunction("Api.Fetch.pqm"),
-    Speckle.Log.Receive = Extension.LoadFunction("Log.Receive.pqm"),
+    Speckle.LogEvent = Extension.LoadFunction("LogEvent.pqm"),
     Extension.LoadFunction = (fileName as text) =>
         let
             binary = Extension.Contents(fileName), asText = Text.FromBinary(binary)
@@ -27,7 +27,7 @@ in
                     sourceApplication = "PowerBI"
                 ]
             ],
-            s = Speckle.Log.Receive(server, commit)
+            s = Speckle.LogEvent(server, commit)
         in
             // Read receipts should fail gracefully no matter what
             try Speckle.Api.Fetch(s, query, variables)[commitReceive] otherwise false

speckle/logging/LogEvent.pqm → speckle/helpers/LogEvent.pqm

@@ -1,4 +1,7 @@
 let
+    GetApplicationSlug = Extension.LoadFunction("GetApplicationSlug.pqm"),
+    GetUser = Extension.LoadFunction("Api.GetUser.pqm"),
+    Hash = Extension.LoadFunction("Hash.pqm"),
     Extension.LoadFunction = (fileName as text) =>
         let
             binary = Extension.Contents(fileName), asText = Text.FromBinary(binary)
@@ -13,12 +16,21 @@ let
                             Detail = [File = fileName, Error = e]
                         ]
 in
-    (server as text, event as text, properties as record) =>
+    (server as text, commit as any) =>
         let
             trackUrl = "https://analytics.speckle.systems/track?ip=1",
+            user = GetUser(server),
+            isMultiplayer = user[id] <> commit[authorId],
             body = [
-                event = event,
-                properties = properties
+                event = "Receive",
+                properties = [
+                    server_id = Hash(server),
+                    token = "acd87c5a50b56df91a795e999812a3a4",
+                    hostApp = "powerbi",
+                    sourceHostApp = GetApplicationSlug(commit[sourceApplication]),
+                    sourceHostAppVersion = commit[sourceApplication],
+                    isMultiplayer = user[id] <> commit[authorId]
+                ]
             ],
             Result = Web.Contents(
                 trackUrl,