From 6d1df4ee879411f7ec1b10cbfd5a35267c3a1d78 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Mon, 6 Jul 2015 15:30:51 -0400 Subject: [PATCH] * lisp/simple.el (set-variable): Use user-error for type mismatch. --- lisp/simple.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/simple.el b/lisp/simple.el index 5ee32d5a787..24ce6c3402e 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -7362,8 +7362,8 @@ With a prefix argument, set VARIABLE to VALUE buffer-locally." (require 'cus-edit) (setq type (widget-convert type)) (unless (widget-apply type :match value) - (error "Value `%S' does not match type %S of %S" - value (car type) variable)))) + (user-error "Value `%S' does not match type %S of %S" + value (car type) variable)))) (if make-local (make-local-variable variable)) -- 2.39.5