aboutsummaryrefslogtreecommitdiff
path: root/lisp/mastodon-profile.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/mastodon-profile.el')
-rw-r--r--lisp/mastodon-profile.el5
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/mastodon-profile.el b/lisp/mastodon-profile.el
index 254f042..bd325c1 100644
--- a/lisp/mastodon-profile.el
+++ b/lisp/mastodon-profile.el
@@ -187,12 +187,15 @@ following the current profile."
(let ((account (mastodon-profile--lookup-account-in-status
user-handle (mastodon-profile--toot-json))))
(if account
- (mastodon-profile--make-author-buffer account)
+ (progn
+ (message "Loading profile of user %s..." user-handle)
+ (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)
+ (message "Loading your profile...")
(mastodon-profile--show-user (mastodon-auth--get-account-name)))
(defun mastodon-profile--account-field (account field)