Mercurial > emacs

comparison lisp/gnus/gnus.el @ 32406:f95da738b2f4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(gnus-group-startup-message): Check for PBM image.
author Dave Love <fx@gnu.org>
date Thu, 12 Oct 2000 09:18:01 +0000
parents bd101eca34c1
children ca7ec5a76115
comparison
equal deleted inserted replaced
32405:fb79b2de00db 32406:f95da738b2f4
773 ((and 773 ((and
774 (fboundp 'find-image) 774 (fboundp 'find-image)
775 (display-graphic-p) 775 (display-graphic-p)
776 (let ((image (find-image 776 (let ((image (find-image
777 `((:type xpm :file "gnus.xpm") 777 `((:type xpm :file "gnus.xpm")
778 (:type xpbm :file "gnus.pbm"
779 ;; Account for the xbm's blackground.
780 :background ,(face-foreground 'gnus-splash-face)
781 :foreground ,(face-background 'default))
778 (:type xbm :file "gnus.xbm" 782 (:type xbm :file "gnus.xbm"
779 ;; Account for the xbm's blackground. 783 ;; Account for the xbm's blackground.
780 :background ,(face-foreground 'gnus-splash-face) 784 :background ,(face-foreground 'gnus-splash-face)
781 :foreground ,(face-background 'default)))))) 785 :foreground ,(face-background 'default))))))
782 (when image 786 (when image