From: Miles Bader Date: Thu, 16 Jun 2005 06:01:42 +0000 (+0000) Subject: Revision: miles@gnu.org--gnu-2005/gnus--devo--0--patch-140 X-Git-Url: http://cgit.sxemacs.org/?a=commitdiff_plain;h=42bcc1d7a5c18f001f7c0824b09f2660dbecb4e5;p=gnus Revision: miles@gnu.org--gnu-2005/gnus--devo--0--patch-140 Update reference to renamed face in gnus-xmas.el 2005-06-16 Miles Bader * lisp/gnus-xmas.el (gnus-xmas-group-startup-message): Use renamed gnus-splash face. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index d55477229..feeccc4fd 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2005-06-16 Miles Bader + * gnus-xmas.el (gnus-xmas-group-startup-message): + Use renamed gnus-splash face. + * assistant.el (assistant-field): Remove "-face" suffix from face name. (assistant-field-face): New backward-compatibility alias for renamed face. diff --git a/lisp/gnus-xmas.el b/lisp/gnus-xmas.el index 32804a9fe..e6b13efbc 100644 --- a/lisp/gnus-xmas.el +++ b/lisp/gnus-xmas.el @@ -1,6 +1,6 @@ ;;; gnus-xmas.el --- Gnus functions for XEmacs -;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003 +;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2005 ;; Free Software Foundation, Inc. ;; Author: Lars Magne Ingebrigtsen @@ -517,7 +517,7 @@ call it with the value of the `gnus-data' text property." (rest (- wheight pheight))) (insert (make-string (max 0 (* 2 (/ rest 3))) ?\n))) ;; Paint it. - (put-text-property (point-min) (point-max) 'face 'gnus-splash-face))) + (put-text-property (point-min) (point-max) 'face 'gnus-splash))) (setq modeline-buffer-identification (list (concat gnus-version ": *Group*"))) (set-buffer-modified-p t))