From 4fcdb8c4b919b3a708684d1b373208dc67367664 Mon Sep 17 00:00:00 2001 From: mousebot Date: Mon, 10 May 2021 16:24:51 +0200 Subject: add my profile function --- lisp/mastodon-profile.el | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'lisp/mastodon-profile.el') diff --git a/lisp/mastodon-profile.el b/lisp/mastodon-profile.el index 2c6b798..254f042 100644 --- a/lisp/mastodon-profile.el +++ b/lisp/mastodon-profile.el @@ -190,6 +190,11 @@ following the current profile." (mastodon-profile--make-author-buffer account) (message "Cannot find a user with handle %S" user-handle)))) +(defun mastodon-profile--my-profile () + "Show the profile of the currently signed in user." + (interactive) + (mastodon-profile--show-user (mastodon-auth--get-account-name))) + (defun mastodon-profile--account-field (account field) "Return FIELD from the ACCOUNT. -- cgit v1.2.3