mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-29 19:48:19 +00:00
Code Issues Releases Activity

* textmodes/rst.el (rst-define-level-faces): Do not define face

Browse Source 
symbol if it is already defined.
This commit is contained in:
Julien Danjou 2011-05-25 11:03:59 +02:00
parent 497c74cdc9
commit 51d5b4eca9
2 changed files with 11 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/ChangeLog
View File

@ -1,3 +1,8 @@
2011-05-25 Julien Danjou <julien@danjou.info>
* textmodes/rst.el (rst-define-level-faces): Do not define face
symbol if it is already defined.
2011-05-24 Vincent Belaïche <vincentb1@users.sourceforge.net>
* play/5x5.el (5x5-new-game, 5x5-randomize):

11
lisp/textmodes/rst.el
View File

@ -2800,11 +2800,12 @@ details check the Rst Faces Defaults group."
rst-level-face-base-color
(+ (* (1- i) rst-level-face-step-light)
rst-level-face-base-light))))
(make-empty-face sym)
(set-face-doc-string sym doc)
(set-face-background sym col)
(set sym sym)
(setq i (1+ i))))))
(unless (boundp sym)
(make-empty-face sym)
(set-face-doc-string sym doc)
(set-face-background sym col)
(set sym sym))
(setq i (1+ i))))))
(rst-define-level-faces)