diff options
| author | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2023-08-22 18:50:21 +0200 |
|---|---|---|
| committer | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2023-08-22 18:51:42 +0200 |
| commit | c8b545193fc035384796e595f51251c84e258922 (patch) | |
| tree | cc05b5a636d6293f9bb11894753aa21b41564985 | |
| parent | a8ff368a246c554fc14f0387cee639f19563a3ca (diff) | |
flychecks for new vars/fun
| -rw-r--r-- | lisp/mastodon-profile.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/mastodon-profile.el b/lisp/mastodon-profile.el index a89946c..261ee0c 100644 --- a/lisp/mastodon-profile.el +++ b/lisp/mastodon-profile.el @@ -78,6 +78,7 @@ (autoload 'mastodon-toot--count-toot-chars "mastodon-toot") (autoload 'mastodon-toot--get-max-toot-chars "mastodon-toot") (autoload 'mastodon-views--add-account-to-list "mastodon-views") +(autoload 'mastodon-return-credential-account "mastodon") (defvar mastodon-tl--horiz-bar) (defvar mastodon-tl--update-point) @@ -106,8 +107,8 @@ extra keybindings." :global nil) (defvar mastodon-profile-credential-account nil - "Holds the JSON data of the CredentialAccount entity, - containing details of the current user's account.") + "Holds the JSON data of the CredentialAccount entity. +It contains details of the current user's account.") (defvar mastodon-profile-acccount-preferences-data nil "Holds the JSON data of the current user's preferences.") @@ -246,7 +247,7 @@ NO-REBLOGS means do not display boosts in statuses." (msg-str "Edit your profile note. C-c C-c to send, C-c C-k to cancel.")) (switch-to-buffer-other-window buffer) (text-mode) - (mastodon-tl--set-buffer-spec (buffer-name buffer) endpoint nil) + (mastodon-tl--set-buffer-spec (buffer-name buffer) "accounts/verify_credentials" nil) (setq-local header-line-format (propertize msg-str 'face font-lock-comment-face)) |