From 31b42363969ac5fbcba444c59c32dd142054bbd9 Mon Sep 17 00:00:00 2001 From: marty hiatt Date: Sun, 30 Oct 2022 11:53:19 +0100 Subject: docstrings --- lisp/mastodon-profile.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'lisp') diff --git a/lisp/mastodon-profile.el b/lisp/mastodon-profile.el index 33c4181..505dbc4 100644 --- a/lisp/mastodon-profile.el +++ b/lisp/mastodon-profile.el @@ -366,7 +366,8 @@ Current settings are fetched from the server." (mastodon-profile--edit-string-value 'display_name)) (defun mastodon-profile--make-meta-fields-params (fields) - "Construct a parameter query string from metadata alist FIELDS." + "Construct a parameter query string from metadata alist FIELDS. +Returns an alist." (let ((keys (cl-loop for count from 1 to 5 collect (cons (format "fields_attributes[%s][name]" count) (format "fields_attributes[%s][value]" count))))) @@ -392,7 +393,8 @@ Current settings are fetched from the server." "metadata fields" fields-updated))))) (defun mastodon-profile--update-meta-fields-alist () - "Prompt for new metadata fields information." + "Prompt for new metadata fields information. +Returns the results as an alist." (let ((fields-old (mastodon-profile--fields-get nil ;; we must fetch the plaintext version: -- cgit v1.2.3