Commit 555b0992 authored by Juanma Barranquero's avatar Juanma Barranquero

* lisp/startup.el (fancy-splash-head): Fix change of 2008-07-02.

* etc/images/splash8.xpm: Remove.
parent 658a0f85
2008-07-18 Francesc Rocher <>
* images/splash8.xpm: Remove.
2008-07-17 Adrian Robert <>
* NEWS: Add entry about NS port.
This diff is collapsed.
2008-07-18 Francesc Rocher <>
* startup.el (fancy-splash-head): Fix change of 2008-07-02.
2008-07-18 Glenn Morris <>
* eshell/esh-arg.el (eshell-quote-backslash): Restrict previous change
......@@ -1442,15 +1442,17 @@ a face or button specification."
(let* ((image-file (cond ((stringp fancy-splash-image)
(cond ((image-type-available-p 'svg)
(cond ((<= (display-planes) 8)
(if (image-type-available-p 'xpm)
((image-type-available-p 'svg)
((image-type-available-p 'png)
((image-type-available-p 'xpm)
(if (and (fboundp 'x-display-planes)
(= (funcall 'x-display-planes) 8))
(t "splash.pbm")))
(t "splash.pbm")))
(img (create-image image-file))
(image-width (and img (car (image-size img))))
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment