From: Stephen Berman <stephen.berman@gmx.net>
To: "Jan Djärv" <jan.h.d@swipnet.se>
Cc: 10178@debbugs.gnu.org
Subject: bug#10178: 24.0.92; emacs -q frame too short for fancy splash image
Date: Sun, 04 Dec 2011 15:09:41 +0100 [thread overview]
Message-ID: <87iplw8m3e.fsf@escher.fritz.box> (raw)
In-Reply-To: <AA3BD7FC-3F07-4B20-82E7-37C2E814F26B@swipnet.se> ("Jan \=\?utf-8\?Q\?Dj\=C3\=A4rv\=22's\?\= message of "Sun, 4 Dec 2011 14:42:56 +0100")
On Sun, 4 Dec 2011 14:42:56 +0100 Jan Djärv <jan.h.d@swipnet.se> wrote:
> 1 dec 2011 kl. 09:45 skrev Stephen Berman:
>
>> Starting with -q does not show the fancy splash image; `M-:
>> (window-height)' returns 34. If I start with -q -geometry 80x36 `M-:
>> (window-height)' returns 35 and the fancy splash image appears (though
>> with this height the last line of the splash screen is partially
>> truncated). I think I started seeing this behavior during the last
>> pretest (24.0.91), but it might have been earlier.
>>
>
> I see in startup.el:
>
> (defun use-fancy-splash-screens-p ()
> "Return t if fancy splash screens should be used."
> (when (and (display-graphic-p)
> (or (and (display-color-p)
> (image-type-available-p 'xpm))
> (image-type-available-p 'pbm)))
> (let ((frame (fancy-splash-frame)))
> (when frame
> (let* ((img (create-image (or fancy-splash-image
> (if (and (display-color-p)
> (image-type-available-p 'xpm))
> "splash.xpm" "splash.pbm"))))
> (image-height (and img (cdr (image-size img nil frame))))
> ;; We test frame-height so that, if the frame is split
> ;; by displaying a warning, that doesn't cause the normal
> ;; splash screen to be used.
> (frame-height (1- (frame-height frame))))
> (> frame-height (+ image-height 19)))))))
>
> On my system, image-height becomes 14.466666666666667, so frame-height
> must be larger than 33.4666....
> 34 should fit. Is image-size something else on your system?
Yes, 15.5 (image-size returns (38.57142857142857 . 15.5)), which means
the decremented frame-height should be > 34.5, so 34 is too small. This
is with the font
-unknown-DejaVu Sans Mono-normal-normal-normal-*-12-*-*-*-m-0-iso10646-1,
which I've been using since well before the fancy splash image started
failing to be displayed.
Steve Berman
next prev parent reply other threads:[~2011-12-04 14:09 UTC|newest]
Thread overview: 13+ messages / expand[flat|nested] mbox.gz Atom feed top
2011-12-01 8:45 bug#10178: 24.0.92; emacs -q frame too short for fancy splash image Stephen Berman
2011-12-04 13:42 ` Jan Djärv
2011-12-04 14:09 ` Stephen Berman [this message]
2011-12-07 16:47 ` Juri Linkov
2011-12-07 21:54 ` Stephen Berman
2011-12-10 13:13 ` Jan Djärv
2011-12-10 15:13 ` Stephen Berman
2011-12-11 12:00 ` Jan Djärv
2011-12-11 16:40 ` Stephen Berman
2011-12-15 21:27 ` Juri Linkov
2011-12-16 6:29 ` Jan Djärv
2012-01-07 9:15 ` Chong Yidong
2019-09-26 17:35 ` Lars Ingebrigtsen
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://www.gnu.org/software/emacs/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=87iplw8m3e.fsf@escher.fritz.box \
--to=stephen.berman@gmx.net \
--cc=10178@debbugs.gnu.org \
--cc=jan.h.d@swipnet.se \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).