bug#24651: 25.1; frame-inherited-parameters only partially works

[Lars Ingebrigtsen]

Colin Fraizer <colin.fraizer@gmail.com> writes:

>     $ emacs -Q
>     M-: (setq frame-inherited-parameters '(height width top left)) <RET>
>     M-: (defun my-debug-fcn ()
>           (interactive)
>           (kill-new (prin1-to-string (mapcar (lambda (f) (cons f (mapcar
>                                                                   (lambda
> (elt) (cons elt (cons (frame-parameter f elt) nil)))
>
> frame-inherited-parameters))) (frame-list))))) <RET>

(This bug report unfortunately got no response at the time.)

The test case is a bit convoluted, but it's basically:

emacs -Q
(setq frame-inherited-parameters '(height width top left))
Make the frame shorter than the default, for instance 20 lines high.
C-x 5 2

I now get a frame that is, indeed, 20 lines high -- but not displaying a
mode line or a minibuffer.  The following:

(defun my-debug-fcn ()
  (mapcar (lambda (f)
            (cons f (mapcar
                     (lambda
                       (elt) (cons elt (cons (frame-parameter f elt) nil)))
                     frame-inherited-parameters)))
          (frame-list)))

evaluates to:

((#<frame *Messages* 0x56007c651568> (height 36) (width 80) (top 66) (left 
1948)) (#<frame  *Minibuf-1* 0x56007bfd6390> (height 20) (width 80) (top 66) 
(left 1958)))

So the first frame is 20 lines, and the new frame is 20 lines, but
`height' is (the default in "emacs -Q") 36 lines "internally", somehow.
Here's what the frame looks like:

If I then resize the frame, then the mode line and minibuffer appears:

So it seems like something is going wrong when doing the inherited
height parameter -- it's not initialising everything the correct way.

Anybody got an insight here?

-- 
(domestic pets only, the antidote for overdose, milk.)
   bloggy blog: http://lars.ingebrigtsen.no