1 files changed, 26 insertions, 0 deletions
diff --git a/src/gizmo/wasp-resolve.el b/src/gizmo/wasp-resolve.el
new file mode 100644
index 00000000..1fc757d2
--- /dev/null
+++ b/src/gizmo/wasp-resolve.el
@@ -0,0 +1,26 @@
+;;; wasp-resolve --- The Strength Of Our Resolve -*- lexical-binding: t; -*-
+;;; Commentary:
+;;; Code:
+(require 'wasp-user)
+
+(defcustom w/resolve-buffer "*wasp-resolve*"
+  "Name of buffer used to display resolve."
+  :type '(string)
+  :group 'wasp)
+
+(defvar w/resolve-recorded nil)
+
+(defun w/resolve-record-user (user)
+  "Record resolve for USER if not already recorded."
+  (unless (-contains? w/resolve-recorded user)
+    (w/user-get
+     user
+     (lambda (data)
+       (when-let ((resolution (alist-get :resolution data)))
+         (add-to-list 'w/resolve-recorded user)
+         (with-current-buffer (get-buffer-create w/resolve-buffer)
+           (goto-char (point-max))
+           (insert (format "%s: %s\n" user resolution))))))))
+
+(provide 'wasp-resolve)
+;;; wasp-resolve.el ends here