summaryrefslogtreecommitdiff
path: root/lisp/simple.el
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2015-07-06 15:30:51 -0400
committerGlenn Morris <rgm@gnu.org>2015-07-06 15:30:51 -0400
commit6d1df4ee879411f7ec1b10cbfd5a35267c3a1d78 (patch)
treee8208f35a4e6d0eff43737f497732686d6e79b26 /lisp/simple.el
parentb81507813a404a9984fd3e8db4dcc1d814d1667b (diff)
* lisp/simple.el (set-variable): Use user-error for type mismatch.
Diffstat (limited to 'lisp/simple.el')
-rw-r--r--lisp/simple.el4
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))