From: Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
Date: Mon, 14 Mar 1994 16:44:04 +0000 (+0000)
Subject: (EmacsFrameSetCharSize): Set the values of left_pos and
X-Git-Tag: emacs-19.34~9521
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a9e3d21271e536be2a80eda64a8c5d8e0c14e0fa;p=emacs.git

(EmacsFrameSetCharSize): Set the values of left_pos and
top_pos to the values of the toplevel widget coordinates.
---

diff --git a/src/widget.c b/src/widget.c
index eb593f15b7d..aabd63accd6 100644
--- a/src/widget.c
+++ b/src/widget.c
@@ -876,6 +876,9 @@ EmacsFrameSetCharSize (widget, columns, rows)
   if (columns < 3) columns = 3;  /* no way buddy */
   if (rows < 3) rows = 3;
 
+  f->display.x->left_pos = f->display.x->widget->core.x;
+  f->display.x->top_pos = f->display.x->widget->core.y;
+
   check_frame_size (f, &rows, &columns);
   f->display.x->vertical_scroll_bar_extra
     = (FRAME_HAS_VERTICAL_SCROLL_BARS (f)