From 13f93deebaa77d555c3b8fd9a3cbc39b8574a8eb Mon Sep 17 00:00:00 2001 From: Gerd Moellmann Date: Fri, 22 Sep 2000 11:20:05 +0000 Subject: [PATCH] (fancy-splash-head): Use splash.pbm instead of splash.xbm. --- lisp/ChangeLog | 5 +++++ lisp/startup.el | 4 ++-- 2 files changed, 7 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 70a8c1ce83e..d0565776597 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2000-09-22 Gerd Moellmann + + * startup.el (fancy-splash-head): Use splash.pbm instead of + splash.xbm. + 2000-09-22 Andre Spiegel * vc.el (vc-switch-backend): Signal an error if the file is not diff --git a/lisp/startup.el b/lisp/startup.el index 3353330a198..3d178d89619 100644 --- a/lisp/startup.el +++ b/lisp/startup.el @@ -915,7 +915,7 @@ where FACE is a valid face specification, as it can be used with "Insert the head part of the splash screen into the current buffer." (let* ((img (create-image (or fancy-splash-image (if (display-color-p) - "splash.xpm" "splash.xbm")))) + "splash.xpm" "splash.pbm")))) (image-width (and img (car (image-size img)))) (window-width (window-width (selected-window)))) (when img @@ -1049,7 +1049,7 @@ where FACE is a valid face specification, as it can be used with (if (assq 'display (frame-parameters)) (if (or (and (display-color-p) (image-type-available-p 'xpm)) - (image-type-available-p 'xbm)) + (image-type-available-p 'pbm)) (fancy-splash-screens) (progn (insert "\ -- 2.39.2