Mercurial > hg > xemacs-beta

diff lwlib/lwlib-Xaw.c @ 3958:7bc12bb1a2cf

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2007-05-17 15:06:04 by stephent] Fix crash with wm delete of dialog. <87sl9v8ot1.fsf@uwakimon.sk.tsukuba.ac.jp>
author stephent
date Thu, 17 May 2007 15:06:04 +0000
parents 174eb4da74fb
children 383ab474a241
line wrap: on
line diff
--- a/lwlib/lwlib-Xaw.c	Wed May 16 21:51:33 2007 +0000
+++ b/lwlib/lwlib-Xaw.c	Thu May 17 15:06:04 2007 +0000
@@ -599,11 +599,14 @@
     abort ();
   XtSetArg (al [0], XtNchildren, &kids);
   XtGetValues (shell, al, 1);
-  if (!kids || !*kids)
-    abort ();
-  widget = kids [0];
-  if (! XtIsSubclass (widget, dialogWidgetClass))
-    abort ();
+  if (!kids || !*kids) abort ();
+
+  for (widget = *kids;
+       widget && ! XtIsSubclass (widget, dialogWidgetClass);
+       widget = *++kids)
+    ;
+  if (!widget) abort ();
+
   id = lw_get_widget_id (widget);
   if (! id) abort ();