From 33481b1aec23139ca2e69022331213930155496c Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 10 Oct 1994 03:26:28 +0000 Subject: [PATCH] (calendar-holiday-marker): Copy holiday-face from highlight face. --- lisp/calendar/calendar.el | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/lisp/calendar/calendar.el b/lisp/calendar/calendar.el index 7d9550d3dc4..07e4ca52c72 100644 --- a/lisp/calendar/calendar.el +++ b/lisp/calendar/calendar.el @@ -167,9 +167,8 @@ Can be either a single-character string or a face.") (require 'faces) (make-face 'holiday-face) (if (x-display-color-p) - (set-face-background 'holiday-face "pink") - (set-face-background 'holiday-face "black") - (set-face-foreground 'holiday-face "white")) + (set-face-background 'holiday-face "pink") + (copy-face 'highlight 'holiday-face)) 'holiday-face) "*Used to mark notable dates in the calendar. Can be either a single-character string or a face.") -- 2.39.5