diff options
| author | marty hiatt <martianhiatus@riseup.net> | 2024-08-18 11:57:28 +0200 |
|---|---|---|
| committer | marty hiatt <martianhiatus@riseup.net> | 2024-08-18 11:57:28 +0200 |
| commit | 248eead48f10f96dafa21463064a297809df6ca9 (patch) | |
| tree | f5a149999c1cc0ea542c8933bb6d17ee0f51f075 | |
| parent | 8b82c650c5ec3286aa05b3a04d8ae09350c9d26e (diff) | |
create filter cleanup
| -rw-r--r-- | lisp/mastodon-views.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/mastodon-views.el b/lisp/mastodon-views.el index c3c372d..5480e09 100644 --- a/lisp/mastodon-views.el +++ b/lisp/mastodon-views.el @@ -674,11 +674,11 @@ Prompt for a context, must be a list containting at least one of \"home\", \"notifications\", \"public\", \"thread\". Optionally, provide ID, TITLE, CONTEXT, TYPE, and TERMS to update a filter." (interactive) - (let* ((url (if id - (mastodon-http--api-v2 (format "filters/%s" id)) - (mastodon-http--api-v2 "filters"))) + (let* ((url (mastodon-http--api-v2 + (if id (format "filters/%s" id) "filters"))) (title (or title (read-string "Filter name: "))) - (terms (or terms (read-string "Terms to filter (comma or space separated): "))) + (terms (or terms + (read-string "Terms to filter (comma or space separated): "))) (terms-split (split-string terms "[, ]")) (terms-processed (if (not terms) @@ -708,7 +708,7 @@ Optionally, provide ID, TITLE, CONTEXT, TYPE, and TERMS to update a filter." (mastodon-http--post url params)))) (mastodon-views--filters-triage resp - (message "Filter %s created!" title)))) + (message "Filter %s %s!" title (if id "updated" "created"))))) (defun mastodon-views--update-filter () "Update filter at point." |