frame moves down when it should not

["Drew Adams" <drew.adams@oracle.com>]

Trying again. The bug is quite old (at least as far
back as Emacs 20). It makes frame movement commands
do the wrong thing whenever the menu-bar wraps.

> From: Drew Adams Sent: Saturday, April 28, 2007 11:58 AM
> To: emacs-devel@gnu.org
> Subject: RE: [drew.adams@oracle.com: RE: set-frame-position - is it a
> bug?]
>
> This 2005 bug was never fixed. It is apparently a Windows-only bug. Could
> this be fixed?
>
> > From: Richard Stallman Sent: Wednesday, July 12, 2006 8:37 AM
> > Would someone please try to debug this?
> >
> >     To: "Emacs-Pretest-Bug" <emacs-pretest-bug@gnu.org>
> >     Date: Sat, 10 Jun 2006 09:56:26 -0700
> >
> >     This bug was apparently never fixed. To reproduce, simply
> >     resize a frame horizontally so that the menu-bar wraps, then
> >     change the 'left frame parameter.
> >
> >     (setq left-pos (cdr (assq 'left (frame-parameters))))
> >     (modify-frame-parameters (selected-frame)
> >       (list (cons 'left (+ 30 left-pos))))
> >
> >     The frame moves down, as well as right.
> >
> >     This is annoying if you have, for instance, a key bound to a
> >     command to move the frame right. Repeated use of this key
> >     sends the frame downward diagonally. Use of the complementary
> >     key to move the frame left sends it downward as well, so the
> >     two are not even inverses if the menu-bar wraps.
> >
> >     Similarly, a command to move the frame up sends it down
> >     instead. So, if you have keys bound to commands that move it
> >     up and down, the up movement is
> >     down instead - the two are not inverses if the menu-bar wraps.
> >
> >         Sent: Friday, August 05, 2005 7:39 AM
> >         To: help-gnu-emacs@gnu.org
> >         Cc: Emacs-Devel
> >         Subject: RE: set-frame-position - is it a bug?
> >
> >             the intention of the following code
> >               (setq fpx (cdr (assoc 'left (frame-parameters))))
> >               (setq fpy (cdr (assoc 'top  (frame-parameters))))
> >               (setq fpx (+ 1 fpx))
> >               (set-frame-position (next-frame) fpx fpy)
> >             is to move the frame honizontally 1 pixel right;
> >             but as a side-effect I get a vertical move as well.
> >             Is there something wrong with my code?
> >
> >         The code looks OK to me.
> >
> >         Is your menu-bar (or tool-bar) wider than your frame, so
> >         that it wraps around? That will cause the behavior you describe.
> >
> >         Actually, now that I think of it, we should probably consider
> >         this an Emacs bug, so I'm cc'ing the emacs-devel list.
> >         Thanks for bringing this up - I've been aware of it for a long
> >         time, but it never occurred to me to file a bug.
> >
> >         Bug: If menu-bar is wider than frame, so it wraps, then
> >         set-frame-position gets it wrong, in the manner described above.

In GNU Emacs 22.1.1 (i386-mingw-nt5.1.2600)
 of 2007-06-02 on RELEASE
Windowing system distributor `Microsoft Corp.', version 5.1.2600
configured using `configure --with-gcc (3.4) --cflags -Ic:/gnuwin32/include'