From 649fa7dfe7162b0c5b20db66246c28ae80e36775 Mon Sep 17 00:00:00 2001 From: yamaoka Date: Mon, 23 Aug 1999 11:57:37 +0000 Subject: [PATCH] (gnus-x-splash): Change the foreground color of `gnus-splash' to "Brown"; use `with-temp-buffer' instead of `with-temp-file'; use `insert-file-contents-as-binary' instead of `insert-file-contents'. --- lisp/gnus-ems.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lisp/gnus-ems.el b/lisp/gnus-ems.el index 8a8c1b1..8983da6 100644 --- a/lisp/gnus-ems.el +++ b/lisp/gnus-ems.el @@ -273,8 +273,8 @@ (erase-buffer) (when (and dir (file-exists-p (setq file (concat dir "x-splash")))) - (with-temp-file nil - (insert-file-contents file) + (with-temp-buffer + (insert-file-contents-as-binary file) (goto-char (point-min)) (ignore-errors (setq pixmap (read (current-buffer)))))) @@ -283,7 +283,7 @@ (make-face 'gnus-splash)) (setq height (/ (car pixmap) (frame-char-height)) width (/ (cadr pixmap) (frame-char-width))) - (set-face-foreground 'gnus-splash "ForestGreen") + (set-face-foreground 'gnus-splash "Brown") (set-face-stipple 'gnus-splash pixmap) (insert-char ?\n (* (/ (window-height) 2 height) height)) (setq i height) -- 1.7.10.4