projects
/
emacs.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
d1e0542
)
* lisp/cus-edit.el (setopt--set): Warn instead of rasing an error
author
Philip Kaludercic
<philipk@posteo.net>
Sat, 17 Dec 2022 16:29:24 +0000
(17:29 +0100)
committer
Philip Kaludercic
<philipk@posteo.net>
Sun, 18 Dec 2022 11:45:22 +0000
(12:45 +0100)
(Bug#60162)
lisp/cus-edit.el
patch
|
blob
|
history
diff --git
a/lisp/cus-edit.el
b/lisp/cus-edit.el
index 0e09e99da95c9caf81f5bbead13d8a275f3a5b6f..ab2f74dbb88086c559026e28b9c82ad520a23bfc 100644
(file)
--- a/
lisp/cus-edit.el
+++ b/
lisp/cus-edit.el
@@
-1073,7
+1073,7
@@
plain variables. This means that `setopt' will execute any
;; Check that the type is correct.
(when-let ((type (get variable 'custom-type)))
(unless (widget-apply (widget-convert type) :match value)
- (
user-error
"Value `%S' does not match type %s" value type)))
+ (
warn
"Value `%S' does not match type %s" value type)))
(put variable 'custom-check-value (list value))
(funcall (or (get variable 'custom-set) #'set-default) variable value))