diff options
| author | Mauro Aranda | 2020-11-03 10:02:51 -0300 |
|---|---|---|
| committer | Mauro Aranda | 2020-11-03 10:02:51 -0300 |
| commit | bd8f4b04d51083bd61350c70c09daff4fd8bb61d (patch) | |
| tree | 29e9ef1a45dadac057fa1d183eb8be8c9840d4c1 | |
| parent | 2d4c981b2112083e80195c0c258422e203048946 (diff) | |
| download | emacs-bd8f4b04d51083bd61350c70c09daff4fd8bb61d.tar.gz emacs-bd8f4b04d51083bd61350c70c09daff4fd8bb61d.zip | |
Fix customizing user options of type face
* lisp/cus-edit.el (face): Move the %f escape after the tag, because
otherwise customizing a face user option doesn't work:
custom-variable-value-create thinks that everything up until the first
":" is part of the tag, and the item widget doesn't know how to handle
the %f escape.
| -rw-r--r-- | lisp/cus-edit.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el index 3eef4468394..34d76bf0963 100644 --- a/lisp/cus-edit.el +++ b/lisp/cus-edit.el | |||
| @@ -4021,7 +4021,7 @@ restoring it to the state of a face that has never been customized." | |||
| 4021 | 4021 | ||
| 4022 | (define-widget 'face 'symbol | 4022 | (define-widget 'face 'symbol |
| 4023 | "A Lisp face name (with sample)." | 4023 | "A Lisp face name (with sample)." |
| 4024 | :format "%f %{%t%}: (%{sample%}) %v" | 4024 | :format "%{%t%}: %f (%{sample%}) %v" |
| 4025 | :tag "Face" | 4025 | :tag "Face" |
| 4026 | :value 'default | 4026 | :value 'default |
| 4027 | :sample-face-get 'widget-face-sample-face-get | 4027 | :sample-face-get 'widget-face-sample-face-get |