From: <david@ngdr.net>
To: martin rudalics <rudalics@gmx.at>
Cc: "25943@debbugs.gnu.org" <25943@debbugs.gnu.org>
Subject: bug#25943: 21.5 Frame Display Difficulties
Date: Wed, 29 Mar 2017 13:53:35 -0600 [thread overview]
Message-ID: <aa04a8028e6a44d724440e1206cfe23d@127.0.0.1> (raw)
In-Reply-To: <58DB63ED.8060305@gmx.at>
[-- Attachment #1: Type: text/plain, Size: 2126 bytes --]
On Wed, 29 Mar 2017 09:36:13 +0200, martin rudalics <rudalics@gmx.at>
wrote:
>> I have run your frame-position code a few times; I have not had time to
>> do
> > anything else.
>
> I suppose you did not (or were not able to) apply my patch so
>
> (setq x-gtk-use-window-move t)
>
> had not effect on the outcome of your runs. Right?
That is correct; I want to try your change; I hope to get to it soon.
>
> > I am unable to do anything similar for 23.2 because
> > function frame-position does not exist in 23.2.
>
> I forgot. Instead of
>
> (pos (frame-position frame))
> (left (car pos))
> (top (cdr pos))
>
> use
>
> (left (frame-parameter frame 'left))
> (top (frame-parameter frame 'top))
>
> for Emacs 23.
I did not think that this would be important. I attach a run for 23.2
this time. FYI, it turns out that the code must be
(id (eval (frame-parameter... in order to handle parameters such as (+
-9)
>
> > Mostly, but not always, the 9-C (fun) frames are consistently in
their
> > correct corner. This is true for the 1-4 (arg) frames as well; I do
not
> > have any record of a deviation, so arg frames may be perfect. The
5-8
> > (par) frames are the deviants, which seem to go the the Left Top
corner.
>
> Your results for 25.1 are better than mine. Here only the "arg" runs
> position correctly. The "fun" and "par" frames all end up in the top
> left corner. So if you do want to continue working with an unpatched
> Emacs 25.1 and want more or less correct positioning you will have to
> use the "arg" notation. Otherwise you will have to either patch your
> 25.1 or switch to the current development version.
>
> (
> (arg
> ...
> (name . "4 Right Bottom")
> (p-left . -40)
> (p-top . -40)
> (left . 1181)
> (top . 694)
> (width . 816)
> (height . 400)
> (r-left . -51)
> (r-top . -58))
>
> It might be interesting to see where these differences in the "arg" case
> come from - 11 pixels horizontally and 18 pixels vertically. What does
>
> M-: (frame-geometry)
>
> in that frame return?
See Run 5 attached.
>
> Thanks, martin
[-- Attachment #2: other-output-5 --]
[-- Type: text/plain, Size: 2516 bytes --]
;; Run 5.
;; In C Right Bottom frame, misplaced at Left Top.
(frame-geometry)
(
(outer-position -9 . 30)
(outer-size 836 . 447)
(external-border-size 10 . 10)
(title-bar-size 0 . 27)
(menu-bar-external . t)
(menu-bar-size 0 . 0)
(tool-bar-external . t)
(tool-bar-position . top)
(tool-bar-size 0 . 0)
(internal-border-width . 0))
;; In 4 Right Bottom frame, correctly placed at Right Bottom.
(frame-geometry)
(
(outer-position 1181 . 694)
(outer-size 836 . 447)
(external-border-size 10 . 10)
(title-bar-size 0 . 27)
(menu-bar-external . t)
(menu-bar-size 0 . 0)
(tool-bar-external . t)
(tool-bar-position . top)
(tool-bar-size 0 . 0)
(internal-border-width . 0))
;; In main Emacs frame.
(frame-position-list)
(
(arg
(name . "1 Left Top")
(p-left . 40)
(p-top . 40)
(left . 31)
(top . 32)
(width . 816)
(height . 400))
(arg
(name . "2 Left Bottom")
(p-left . 40)
(p-top . -40)
(left . 31)
(top . 694)
(width . 816)
(height . 400)
(r-top . -58))
(arg
(name . "3 Right Top")
(p-left . -40)
(p-top . 40)
(left . 1181)
(top . 32)
(width . 816)
(height . 400)
(r-left . -51))
(arg
(name . "4 Right Bottom")
(p-left . -40)
(p-top . -40)
(left . 1181)
(top . 694)
(width . 816)
(height . 400)
(r-left . -51)
(r-top . -58))
(par
(name . "5 Left Top")
(p-left . 40)
(p-top . 40)
(left . 31)
(top . 32)
(width . 816)
(height . 400))
(par
(name . "6 Left Bottom")
(p-left . 40)
(p-top . -40)
(left . -9)
(top . 30)
(width . 816)
(height . 400)
(r-top . -722))
(par
(name . "7 Right Top")
(p-left . -40)
(p-top . 40)
(left . -9)
(top . 30)
(width . 816)
(height . 400)
(r-left . -1241))
(par
(name . "8 Right Bottom")
(p-left . -40)
(p-top . -40)
(left . -9)
(top . 30)
(width . 816)
(height . 400)
(r-left . -1241)
(r-top . -722))
(fun
(name . "9 Left Top")
(p-left . 40)
(p-top . 40)
(left . -9)
(top . 30)
(width . 816)
(height . 400))
(fun
(name . "A Left Bottom")
(p-left . 40)
(p-top . -40)
(left . -9)
(top . 30)
(width . 816)
(height . 400)
(r-top . -722))
(fun
(name . "B Right Top")
(p-left . -40)
(p-top . 40)
(left . -9)
(top . 30)
(width . 816)
(height . 400)
(r-left . -1241))
(fun
(name . "C Right Bottom")
(p-left . -40)
(p-top . -40)
(left . -9)
(top . 30)
(width . 816)
(height . 400)
(r-left . -1241)
(r-top . -722))
(display-pixel-height . 1152)
(display-pixel-width . 2048))
[-- Attachment #3: other-output-6-23.2 --]
[-- Type: text/plain, Size: 1752 bytes --]
;; 23.2 In C Right Bottom, correctly placed.
(frame-position-list)
(
(arg
(name . "1 Left Top")
(p-left . 40)
(p-top . 40)
(left . 30)
(top . 30)
(width . 656)
(height . 340))
(arg
(name . "2 Left Bottom")
(p-left . 40)
(p-top . -40)
(left . 30)
(top . 735)
(width . 656)
(height . 340)
(r-top . -77))
(arg
(name . "3 Right Top")
(p-left . -40)
(p-top . 40)
(left . 1342)
(top . 30)
(width . 656)
(height . 340)
(r-left . -50))
(arg
(name . "4 Right Bottom")
(p-left . -40)
(p-top . -40)
(left . 1342)
(top . 735)
(width . 656)
(height . 340)
(r-left . -50)
(r-top . -77))
(par
(name . "5 Left Top")
(p-left . 40)
(p-top . 40)
(left . 30)
(top . 30)
(width . 656)
(height . 340))
(par
(name . "6 Left Bottom")
(p-left . 40)
(p-top . -40)
(left . 30)
(top . 735)
(width . 656)
(height . 340)
(r-top . -77))
(par
(name . "7 Right Top")
(p-left . -40)
(p-top . 40)
(left . 1342)
(top . 30)
(width . 656)
(height . 340)
(r-left . -50))
(par
(name . "8 Right Bottom")
(p-left . -40)
(p-top . -40)
(left . 1342)
(top . 735)
(width . 656)
(height . 340)
(r-left . -50)
(r-top . -77))
(fun
(name . "9 Left Top")
(p-left . 40)
(p-top . 40)
(left . 30)
(top . 30)
(width . 656)
(height . 340))
(fun
(name . "A Left Bottom")
(p-left . 40)
(p-top . -40)
(left . 30)
(top . 735)
(width . 656)
(height . 340)
(r-top . -77))
(fun
(name . "B Right Top")
(p-left . -40)
(p-top . 40)
(left . 1342)
(top . 30)
(width . 656)
(height . 340)
(r-left . -50))
(fun
(name . "C Right Bottom")
(p-left . -40)
(p-top . -40)
(left . 1342)
(top . 735)
(width . 656)
(height . 340)
(r-left . -50)
(r-top . -77))
(display-pixel-height . 1152)
(display-pixel-width . 2048))
next prev parent reply other threads:[~2017-03-29 19:53 UTC|newest]
Thread overview: 27+ messages / expand[flat|nested] mbox.gz Atom feed top
2017-03-03 3:51 bug#25943: 21.5 Frame Display Difficulties david
2017-03-03 8:13 ` martin rudalics
[not found] ` <af552a322a8a630796cbddf1133b6dbe@127.0.0.1>
2017-03-04 9:59 ` martin rudalics
2017-03-07 1:51 ` david
2017-03-07 9:45 ` martin rudalics
2017-03-08 22:58 ` david
2017-03-09 8:56 ` martin rudalics
2017-03-10 18:44 ` david
2017-03-11 10:21 ` martin rudalics
2017-03-23 7:59 ` martin rudalics
2017-03-28 22:43 ` david
2017-03-29 7:36 ` martin rudalics
2017-03-29 19:53 ` david [this message]
2017-03-30 7:29 ` martin rudalics
2017-04-01 4:35 ` david
2017-04-01 7:36 ` martin rudalics
[not found] ` <7ee8200b866d8067514fb8b0bb9e814b@127.0.0.1>
2017-04-02 7:55 ` martin rudalics
2017-04-04 0:35 ` david
2017-04-04 7:25 ` martin rudalics
2017-04-07 0:12 ` david
2017-04-07 5:56 ` martin rudalics
2017-04-07 21:16 ` david
2022-04-25 14:48 ` Lars Ingebrigtsen
2022-05-24 12:50 ` Lars Ingebrigtsen
2017-04-07 21:19 ` david
2017-04-08 9:00 ` martin rudalics
2017-04-11 6:49 ` martin rudalics
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
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=aa04a8028e6a44d724440e1206cfe23d@127.0.0.1 \
--to=david@ngdr.net \
--cc=25943@debbugs.gnu.org \
--cc=rudalics@gmx.at \
/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 external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.