branch: elpa/mastodon commit d92983b478a829ea1149251f71f823323750dd89 Author: marty hiatt <martianhia...@disroot.org> Commit: marty hiatt <martianhia...@disroot.org>
flychec/docstrings --- lisp/mastodon-profile.el | 3 ++- lisp/mastodon-tl.el | 2 +- 2 files changed, 3 insertions(+), 2 deletions(-) diff --git a/lisp/mastodon-profile.el b/lisp/mastodon-profile.el index 3efa13d0d8..8852806d91 100644 --- a/lisp/mastodon-profile.el +++ b/lisp/mastodon-profile.el @@ -178,7 +178,8 @@ MAX-ID is a flag to include the max_id pagination parameter." (map-keys mastodon-profile--account-view-alist)) (defun mastodon-profile--account-view-cycle (&optional prefix) - "Cycle through profile view: toots, toot sans boosts, followers, and following." + "Cycle through profile view: toots, toot sans boosts, followers, and following. +If a PREFIX argument is provided, prompt for a view type and load." (interactive "P") (if prefix (let* ((choice diff --git a/lisp/mastodon-tl.el b/lisp/mastodon-tl.el index ab7fb9ef06..6e755fb046 100644 --- a/lisp/mastodon-tl.el +++ b/lisp/mastodon-tl.el @@ -2888,7 +2888,7 @@ PREFIX is for `mastodon-tl--show-tag-timeline', which see." (interactive "P") (if (not mastodon-tl--tags-groups) (user-error - "Set `mastodon-tl--tags-groups' to view tag group timelines.") + "Set `mastodon-tl--tags-groups' to view tag group timelines") (let* ((list-strs (mapcar (lambda (x) ;; cons of list-as-string and list: (cons (prin1-to-string x) x))