diff options
| author | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2023-10-15 10:49:13 +0200 |
|---|---|---|
| committer | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2023-10-15 10:49:13 +0200 |
| commit | a53d9824fe19c7ddeea665878fd963a5b11695f5 (patch) | |
| tree | 2d5106da645e3dca392c7df716858d225a30d5b9 /lisp/mastodon-views.el | |
| parent | dd5a34bb8db2f544b53811fb89dfa649ecca198c (diff) | |
change some error calls to user-error calls
Diffstat (limited to 'lisp/mastodon-views.el')
| -rw-r--r-- | lisp/mastodon-views.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/mastodon-views.el b/lisp/mastodon-views.el index e348cae..fc2e2d1 100644 --- a/lisp/mastodon-views.el +++ b/lisp/mastodon-views.el @@ -629,14 +629,14 @@ Prompt for a context, must be a list containting at least one of \"home\", nil nil (or (current-word) ""))) (contexts (if (string-empty-p word) - (error "You must select at least one word for a filter") + (user-error "You must select at least one word for a filter") (completing-read-multiple "Contexts to filter [TAB for options]: " '("home" "notifications" "public" "thread") nil t))) (contexts-processed (if (equal nil contexts) - (error "You must select at least one context for a filter") + (user-error "You must select at least one context for a filter") (mapcar (lambda (x) (cons "context[]" x)) contexts))) @@ -656,7 +656,7 @@ Prompt for a context, must be a list containting at least one of \"home\", (phrase (mastodon-tl--property 'phrase :no-move)) (url (mastodon-http--api (format "filters/%s" filter-id)))) (if (null phrase) - (error "No filter at point?") + (user-error "No filter at point?") (when (y-or-n-p (format "Delete filter %s? " phrase)) (let ((response (mastodon-http--delete url))) (mastodon-http--triage |