[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/faces.el
From: |
Juri Linkov |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/faces.el |
Date: |
Sun, 11 Dec 2005 06:08:34 -0500 |
Index: emacs/lisp/faces.el
diff -c emacs/lisp/faces.el:1.344 emacs/lisp/faces.el:1.345
*** emacs/lisp/faces.el:1.344 Sun Nov 20 15:24:27 2005
--- emacs/lisp/faces.el Sun Dec 11 11:08:34 2005
***************
*** 1577,1593 ****
(defcustom frame-background-mode nil
"*The brightness of the background.
Set this to the symbol `dark' if your background color is dark,
! `light' if your background is light, or nil (default) if you want Emacs
! to examine the brightness for you. Don't set this variable with `setq';
! this won't have the expected effect."
:group 'faces
:set #'(lambda (var value)
(set-default var value)
(mapc 'frame-set-background-mode (frame-list)))
:initialize 'custom-initialize-changed
! :type '(choice (choice-item dark)
! (choice-item light)
! (choice-item :tag "default" nil)))
(defvar default-frame-background-mode nil
"Internal variable for the default brightness of the background.
--- 1577,1593 ----
(defcustom frame-background-mode nil
"*The brightness of the background.
Set this to the symbol `dark' if your background color is dark,
! `light' if your background is light, or nil (automatic by default)
! if you want Emacs to examine the brightness for you. Don't set this
! variable with `setq'; this won't have the expected effect."
:group 'faces
:set #'(lambda (var value)
(set-default var value)
(mapc 'frame-set-background-mode (frame-list)))
:initialize 'custom-initialize-changed
! :type '(choice (const dark)
! (const light)
! (const :tag "automatic" nil)))
(defvar default-frame-background-mode nil
"Internal variable for the default brightness of the background.
***************
*** 1983,1989 ****
(t :inverse-video t))
"Basic face for highlighting trailing whitespace."
:version "21.1"
! :group 'whitespace ; like `show-trailing-whitespace'
:group 'basic-faces)
(defface escape-glyph
--- 1983,1989 ----
(t :inverse-video t))
"Basic face for highlighting trailing whitespace."
:version "21.1"
! :group 'whitespace-faces ; like `show-trailing-whitespace'
:group 'basic-faces)
(defface escape-glyph
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/faces.el,
Juri Linkov <=