From: Jan Djärv <jan.h.d@swipnet.se>
Date: Tue, 20 Sep 2005 20:07:15 +0000 (+0000)
Subject: * gtkutil.c (xg_set_geometry): Do a gtk_window_move if program
X-Git-Tag: emacs-pretest-22.0.90~7005
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=52d166e00e99c1babe8c46bb3e4af97c1bc57bcb;p=emacs.git

* gtkutil.c (xg_set_geometry): Do a gtk_window_move if program
 positions have been set for the frame (as is done for frames in
 special-display-buffer-names).
---

diff --git a/src/ChangeLog b/src/ChangeLog
index 984549c1968..5dc4f76e8b7 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,9 @@
+2005-09-20  Jan Dj,Ad(Brv  <jan.h.d@swipnet.se>
+
+	* gtkutil.c (xg_set_geometry): Do a gtk_window_move if program
+	positions have been set for the frame (as is done for frames in
+	special-display-buffer-names).
+
 2005-09-19  Kim F. Storm  <storm@cua.dk>
 
 	* editfns.c (Fformat): Don't scan past end of format string that
diff --git a/src/gtkutil.c b/src/gtkutil.c
index 3b590e0faed..84ce64beb56 100644
--- a/src/gtkutil.c
+++ b/src/gtkutil.c
@@ -554,6 +554,9 @@ xg_set_geometry (f)
     if (!gtk_window_parse_geometry (GTK_WINDOW (FRAME_GTK_OUTER_WIDGET (f)),
                                     geom_str))
       fprintf (stderr, "Failed to parse: '%s'\n", geom_str);
+  } else if (f->size_hint_flags & PPosition) {
+    gtk_window_move (GTK_WINDOW (FRAME_GTK_OUTER_WIDGET (f)),
+                     f->left_pos, f->top_pos);
   }
 }