Commit d4b632fab711

Vincent Demeester <vincent@sbr.pm>
2026-06-09 22:49:14
fix(emacs): use symbol keys in usage-metrics json dump
json-serialize rejects string-keyed alists, which broke usage-metrics-dump on Emacs exit with a symbolp type error.
main
1 parent a57e9d5
Changed files (1)
tools
usage-metrics
usage-metrics.el
tools/usage-metrics/usage-metrics.el
@@ -58,10 +58,10 @@
   (let* ((features-list (usage-metrics--get-loaded-features))
          (cmd-freq (usage-metrics--get-command-frequency))
          (packages (usage-metrics--get-package-list))
-         (data `(("timestamp" . ,(format-time-string "%Y-%m-%dT%H:%M:%S%z"))
-                 ("loaded_features" . ,(vconcat features-list))
-                 ("installed_packages" . ,(vconcat packages))
-                 ("command_frequency" . ,(let ((ht (make-hash-table :test 'equal)))
+         (data `((timestamp . ,(format-time-string "%Y-%m-%dT%H:%M:%S%z"))
+                 (loaded_features . ,(vconcat features-list))
+                 (installed_packages . ,(vconcat packages))
+                 (command_frequency . ,(let ((ht (make-hash-table :test 'equal)))
                                            (dolist (pair (seq-take cmd-freq 200))
                                              (puthash (car pair) (cdr pair) ht))
                                            ht))))