aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorMiles Bader2002-06-10 02:51:39 +0000
committerMiles Bader2002-06-10 02:51:39 +0000
commit4abe16b531dc2596efe075fc612949d2b492da68 (patch)
treeda6bd94b24ae94589684dc4774c488f945649396
parent2b32d1a7ca64a79baf74e1547d38459482464f45 (diff)
downloademacs-4abe16b531dc2596efe075fc612949d2b492da68.tar.gz
emacs-4abe16b531dc2596efe075fc612949d2b492da68.zip
(custom-display): Use correct syntax for `supports' attributes.
-rw-r--r--lisp/ChangeLog1
-rw-r--r--lisp/cus-edit.el2
2 files changed, 2 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 68c428f29f2..328809035ca 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -3,6 +3,7 @@
3 * faces.el (display-supports-face-attributes-p): New function. 3 * faces.el (display-supports-face-attributes-p): New function.
4 (face-spec-set-match-display): Support `supports' predicate. 4 (face-spec-set-match-display): Support `supports' predicate.
5 (italic): Try underlining for displays that don't support real italics. 5 (italic): Try underlining for displays that don't support real italics.
6 * cus-edit.el (custom-display): Add support for `supports' predicate.
6 * term/tty-colors.el (color-name-rgb-alist): Use 16-bit RGB values 7 * term/tty-colors.el (color-name-rgb-alist): Use 16-bit RGB values
7 instead of 8-bit, for consistency with the rest of emacs. 8 instead of 8-bit, for consistency with the rest of emacs.
8 (tty-color-canonicalize): Only copy COLOR if we need to change it. 9 (tty-color-canonicalize): Only copy COLOR if we need to change it.
diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index d09d39733b3..d6d82f34c2e 100644
--- a/lisp/cus-edit.el
+++ b/lisp/cus-edit.el
@@ -2631,7 +2631,7 @@ Match frames with dark backgrounds.")
2631 (group :sibling-args (:help-echo "\ 2631 (group :sibling-args (:help-echo "\
2632Only match frames that support the specified face attributes.") 2632Only match frames that support the specified face attributes.")
2633 (const :format "Supports attributes:" supports) 2633 (const :format "Supports attributes:" supports)
2634 (custom-face-edit :format "%n%v")))))) 2634 (custom-face-edit :inline t :format "%n%v"))))))
2635 2635
2636;;; The `custom-face' Widget. 2636;;; The `custom-face' Widget.
2637 2637