mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-22 07:09:54 +00:00
Code Issues Releases Activity

* lisp/faces.el (cursor): Doc fix.

Browse Source 
Also, remove the :foreground attributes from cursor faces
in built-in themes, since that attribute is unmeaningful.
This commit is contained in:
Chong Yidong 2011-10-18 02:17:05 -04:00
parent 743d0817bc
commit 08b0fee82a
10 changed files with 16 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
etc/themes/deeper-blue-theme.el
View File

@ -37,7 +37,7 @@
`(compilation-line-number ((,class (:foreground "LightGreen"))))
`(cperl-array-face ((,class (:foreground "yellow2"))))
`(cperl-hash-face ((,class (:foreground "coral1"))))
`(cursor ((,class (:background "green" :foreground "black"))))
`(cursor ((,class (:background "green"))))
`(default ((,class (:background "#181a26" :foreground "gray80"))))
`(diff-added ((,class (nil))))
`(diff-changed ((,class (nil))))

2
etc/themes/dichromacy-theme.el
View File

@ -42,7 +42,7 @@ Ansi-Color faces are included.")
(custom-theme-set-faces
'dichromacy
`(default ((,class (:foreground "black" :background "white"))))
`(cursor ((,class (:foreground "white" :background "black"))))
`(cursor ((,class (:background "black"))))
;; Highlighting faces
`(fringe ((,class (:background "#f7f7f7"))))
`(highlight ((,class (:foreground ,blue :background "#e5e5e5"))))

2
etc/themes/misterioso-theme.el
View File

@ -33,7 +33,7 @@
(:background "#2d3743" :foreground "#e1e1e0"))
(,class
(:background "#3a3a3a" :foreground "#e1e1e0"))))
`(cursor ((,class (:background "#415160" :foreground "#415160"))))
`(cursor ((,class (:background "#415160"))))
;; Highlighting faces
`(fringe ((,class (:background "#2e3748"))))
`(highlight ((,class (:background "#338f86" :foreground "#e1e1e0"))))

2
etc/themes/tango-dark-theme.el
View File

@ -56,7 +56,7 @@ Semantic, and Ansi-Color faces are included.")
(:foreground ,alum-1 :background "#222"))
(,class
(:foreground ,alum-1 :background "black"))))
`(cursor ((,class (:foreground ,alum-6 :background ,butter-1))))
`(cursor ((,class (:background ,butter-1))))
;; Highlighting faces
`(fringe ((,class (:background ,alum-7))))
`(highlight ((,class (:foreground ,alum-6 :background ,butter-2))))

2
etc/themes/tango-theme.el
View File

@ -49,7 +49,7 @@ Semantic, and Ansi-Color faces are included.")
(custom-theme-set-faces
'tango
`(default ((,class (:foreground ,alum-6 :background ,alum-1))))
`(cursor ((,class (:foreground ,alum-1 :background ,blue-3))))
`(cursor ((,class (:background ,blue-3))))
;; Highlighting faces
`(fringe ((,class (:background ,alum-2))))
`(highlight ((,class (:background ,alum-3))))

2
etc/themes/wheatgrass-theme.el
View File

@ -29,7 +29,7 @@ of green, brown, and blue.")
(custom-theme-set-faces
'wheatgrass
`(default ((,class (:foreground "wheat" :background "black"))))
`(cursor ((,class (:foreground "black" :background "thistle"))))
`(cursor ((,class (:background "thistle"))))
`(error ((,class (:foreground "salmon1"))))
`(warning ((,class (:foreground "orange"))))
`(success ((,class (:foreground "yellow green"))))

2
etc/themes/whiteboard-theme.el
View File

@ -38,7 +38,7 @@
`(cperl-array-face ((,class (:foreground "SlateBlue3"))))
`(cperl-hash-face ((,class (:foreground "turquoise3"))))
`(cperl-nonoverridable-face ((,class (:foreground "orchid3"))))
`(cursor ((,class (:background "Green4" :foreground "gainsboro"))))
`(cursor ((,class (:background "Green4"))))
`(default ((,class (:background "whitesmoke" :foreground "black"))))
`(dired-marked ((,class (:background "dodgerblue3" :foreground "white"))))
`(flymake-errline ((,class (:background nil :underline "red"))))

2
etc/themes/wombat-theme.el
View File

@ -31,7 +31,7 @@ are included.")
(custom-theme-set-faces
'wombat
`(default ((,class (:background "#242424" :foreground "#f6f3e8"))))
`(cursor ((,class (:background "#656565" :foreground "#f6f3e8"))))
`(cursor ((,class (:background "#656565"))))
;; Highlighting faces
`(fringe ((,class (:background "#303030"))))
`(highlight ((,class (:background "#454545" :foreground "#ffffff"

4
lisp/ChangeLog
View File

@ -1,3 +1,7 @@
2011-10-18 Chong Yidong <cyd@gnu.org>
* faces.el (cursor): Doc fix.
2011-10-17 Chong Yidong <cyd@gnu.org>
* font-lock.el (font-lock-maximum-size): Mark as obsolete.

4
lisp/faces.el
View File

@ -2366,6 +2366,10 @@ used to display the prompt text."
'((((background light)) :background "black")
(((background dark)) :background "white"))
"Basic face for the cursor color under X.
Currently, only the `:background' attribute is meaningful; all
other attributes are ignored. The cursor foreground color is
taken from the background color of the underlying text.
Note: Other faces cannot inherit from the cursor face."
:version "21.1"
:group 'cursor