[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

`make-frame' makes taller frame than the specified height

From: Katsumi Yamaoka
Subject: `make-frame' makes taller frame than the specified height
Date: Thu, 23 Jun 2005 16:54:43 +0900
User-agent: Gnus/5.110004 (No Gnus v0.4) Emacs/22.0.50 (gnu/linux)


Is it only to me?  The height of the new frame grows by 3 when
evaluating the following form:

(let ((params (frame-parameters (selected-frame))))
  (make-frame (delq (assq 'minibuffer params) params)))

It occurs only in Emacs which was built as:

GNU Emacs (i686-pc-linux-gnu, X toolkit, Xaw3d scroll bars)

Furthermore, I also tried it with:

GNU Emacs (i686-pc-linux-gnu, GTK+ Version 2.6.7)

That problem is not there.  (However, the new frame is not
created in the same position.  It seems to be due to the window
manager, though.)

I did them in the Fedora Core 4 platform.  Since `raise-frame'
does nothing in this platform, I'm trying to advise it to be
replaced with `delete-frame' and `make-frame' as follows:

(defadvice raise-frame (around make-new-frame-in-the-same-place
                               (&optional frame) activate)
  "Make it work."
  (unless frame
    (setq frame (selected-frame)))
  (let* ((params (frame-parameters frame))
         (height (assq 'height params)))
    (setcdr height (- (cdr height) 3))
    (make-frame (delq (assq 'minibuffer params) params))
    (delete-frame frame)))


reply via email to

[Prev in Thread] Current Thread [Next in Thread]