diff options
| author | Gerd Moellmann | 2001-07-16 11:52:56 +0000 |
|---|---|---|
| committer | Gerd Moellmann | 2001-07-16 11:52:56 +0000 |
| commit | 36755dd923b77e9aa58d61e49a5188caa026397b (patch) | |
| tree | 2f545819f1708ff0730f20db3b1e959da79d4ea2 | |
| parent | 6a05d05fafe43d1546cef84b004372b784d3792f (diff) | |
| download | emacs-36755dd923b77e9aa58d61e49a5188caa026397b.tar.gz emacs-36755dd923b77e9aa58d61e49a5188caa026397b.zip | |
(set-variable): Require 'cus-edit' instead of
`wid-edit', so that the Custom widgets get defined.
| -rw-r--r-- | lisp/simple.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index 4cde8642cf1..dec66469c10 100644 --- a/lisp/simple.el +++ b/lisp/simple.el | |||
| @@ -3530,7 +3530,7 @@ in the definition is used to check that VALUE is valid." | |||
| 3530 | (let ((type (get var 'custom-type))) | 3530 | (let ((type (get var 'custom-type))) |
| 3531 | (when type | 3531 | (when type |
| 3532 | ;; Match with custom type. | 3532 | ;; Match with custom type. |
| 3533 | (require 'wid-edit) | 3533 | (require 'cus-edit) |
| 3534 | (setq type (widget-convert type)) | 3534 | (setq type (widget-convert type)) |
| 3535 | (unless (widget-apply type :match val) | 3535 | (unless (widget-apply type :match val) |
| 3536 | (error "Value `%S' does not match type %S of %S" | 3536 | (error "Value `%S' does not match type %S of %S" |