diff options
author | Glenn Morris <rgm@gnu.org> | 2015-07-06 15:30:51 -0400 |
---|---|---|
committer | Glenn Morris <rgm@gnu.org> | 2015-07-06 15:30:51 -0400 |
commit | 6d1df4ee879411f7ec1b10cbfd5a35267c3a1d78 (patch) | |
tree | e8208f35a4e6d0eff43737f497732686d6e79b26 /lisp/simple.el | |
parent | b81507813a404a9984fd3e8db4dcc1d814d1667b (diff) |
* lisp/simple.el (set-variable): Use user-error for type mismatch.
Diffstat (limited to 'lisp/simple.el')
-rw-r--r-- | lisp/simple.el | 4 |
1 files 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)) |