# HG changeset patch
# User stephent
# Date 1147073725 0
# Node ID 6830a3f39553a468ef0c3655b2f94fa0a497acbe
# Parent  4b7189c86161c2db35a9c100f953d8abef2c7f69
[xemacs-hg @ 2006-05-08 07:35:23 by stephent]
Improve DEBUG_GEOMETRY_MANAGEMENT messages.
<87y7xdotzh.fsf@tleepslib.sk.tsukuba.ac.jp>

diff -r 4b7189c86161 -r 6830a3f39553 src/ChangeLog
--- a/src/ChangeLog	Sun May 07 21:51:09 2006 +0000
+++ b/src/ChangeLog	Mon May 08 07:35:25 2006 +0000
@@ -1,3 +1,9 @@
+2006-05-08  Stephen J. Turnbull  <stephen@xemacs.org>
+
+	* EmacsShell-sub.c (RootGeometryManager):
+	Change garbage to useful messages under DEBUG_GEOMETRY_MANAGEMENT.
+	Based on a suggestion by Francois L'Archeveque.
+
 2006-05-02  Stephen J. Turnbull  <stephen@xemacs.org>
 
 	* doc.c (extract_object_file_name): Fix buffer overrun.
diff -r 4b7189c86161 -r 6830a3f39553 src/EmacsShell-sub.c
--- a/src/EmacsShell-sub.c	Sun May 07 21:51:09 2006 +0000
+++ b/src/EmacsShell-sub.c	Mon May 08 07:35:25 2006 +0000
@@ -339,11 +339,16 @@
 	  result == XtGeometryAlmost ? "XtGeometryAlmost" :
 	  "XtGeometryDone");
   if (reply->request_mode & CWWidth)
-    printf ("width returned;");
+    printf ("width returned was %d%s",
+	    reply->width,
+	    reply->request_mode & CWHeight ? "; " : ".\n");
   if (reply->request_mode & CWHeight)
-    printf ("height returned;");
-  printf ("\n");
-  printf ("  resulting shell size: %d %d\n", reply->width, reply->height);
+    printf ("height returned was %d.\n", reply->height);
+  /* #### does this also need to depend on the result?
+     With XtGeometryYes there doesn't seem to be a useful reply object. */
+  printf ("  resulting shell size: %d %d\n",
+	  reply->request_mode & CWWidth ? reply->width : w->core.width,
+	  reply->request_mode & CWHeight ? reply->height : w->core.height);
   printf ("----------\n");
   fflush (stdout);
 #endif