diff options
Diffstat (limited to 'lisp/cus-edit.el')
| -rw-r--r-- | lisp/cus-edit.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el index 1f496af7d57..50dce5ee285 100644 --- a/lisp/cus-edit.el +++ b/lisp/cus-edit.el @@ -1075,6 +1075,7 @@ plain variables. This means that `setopt' will execute any (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))) + (put variable 'custom-check-value (list value)) (funcall (or (get variable 'custom-set) #'set-default) variable value)) ;;;###autoload |