From a53d9824fe19c7ddeea665878fd963a5b11695f5 Mon Sep 17 00:00:00 2001 From: marty hiatt Date: Sun, 15 Oct 2023 10:49:13 +0200 Subject: change some error calls to user-error calls --- lisp/mastodon-views.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'lisp/mastodon-views.el') 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 -- cgit v1.2.3