Commit 1e252576 authored by Karl Heuer's avatar Karl Heuer
Browse files

(holiday-face, calendar-today-face, diary-face): Add

faces to facemenu-unlisted-faces before creating so that facemenu
won't list them as faces to be added interactively.
parent 5ee80bd3
......@@ -139,6 +139,7 @@ The marking symbol is specified by the variable `diary-entry-marker'.")
(if (not window-system)
"+"
(require 'faces)
(add-to-list 'facemenu-unlisted-faces 'diary-face)
(make-face 'diary-face)
(cond ((face-differs-from-default-p 'diary-face))
((x-display-color-p) (set-face-foreground 'diary-face "red"))
......@@ -151,6 +152,7 @@ Can be either a single-character string or a face.")
(if (not window-system)
"="
(require 'faces)
(add-to-list 'facemenu-unlisted-faces 'calendar-today-face)
(make-face 'calendar-today-face)
(if (not (face-differs-from-default-p 'calendar-today-face))
(set-face-underline-p 'calendar-today-face t))
......@@ -162,6 +164,7 @@ Can be either a single-character string or a face.")
(if (not window-system)
"*"
(require 'faces)
(add-to-list 'facemenu-unlisted-faces 'holiday-face)
(make-face 'holiday-face)
(cond ((face-differs-from-default-p 'holiday-face))
((x-display-color-p) (set-face-background 'holiday-face "pink"))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment