From 688f8f7f51c4d99d54527191a6d2fabcf458179b Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sun, 18 Sep 1994 19:54:50 +0000 Subject: [PATCH] entered into RCS --- lwlib/lwlib-Xm.c | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) diff --git a/lwlib/lwlib-Xm.c b/lwlib/lwlib-Xm.c index f56d22bf28..16d25ea20a 100644 --- a/lwlib/lwlib-Xm.c +++ b/lwlib/lwlib-Xm.c @@ -730,9 +730,12 @@ make_dialog (char* name, Widget parent, Boolean pop_up_p, result = form; } + n_children = left_buttons + right_buttons + 1; ac = 0; - XtSetArg(al[ac], XmNpacking, XmPACK_COLUMN); ac++; - XtSetArg(al[ac], XmNorientation, XmVERTICAL); ac++; + XtSetArg(al[ac], XmNpacking, n_children == 3? + XmPACK_COLUMN: XmPACK_TIGHT); ac++; + XtSetArg(al[ac], XmNorientation, n_children == 3? + XmVERTICAL: XmHORIZONTAL); ac++; XtSetArg(al[ac], XmNnumColumns, left_buttons + right_buttons + 1); ac++; XtSetArg(al[ac], XmNmarginWidth, 0); ac++; XtSetArg(al[ac], XmNmarginHeight, 0); ac++; @@ -760,6 +763,7 @@ make_dialog (char* name, Widget parent, Boolean pop_up_p, XtSetArg(al[ac], XmNhighlightThickness, 1); ac++; XtSetArg(al[ac], XmNshowAsDefault, TRUE); ac++; } + XtSetArg(al[ac], XmNmarginWidth, 10); ac++; XtSetArg(al[ac], XmNnavigationType, XmTAB_GROUP); ac++; children [n_children] = XmCreatePushButton (row, button_name, al, ac); @@ -785,6 +789,7 @@ make_dialog (char* name, Widget parent, Boolean pop_up_p, char button_name [16]; sprintf (button_name, "button%d", left_buttons + i + 1); ac = 0; + XtSetArg(al[ac], XmNmarginWidth, 10); ac++; XtSetArg(al[ac], XmNnavigationType, XmTAB_GROUP); ac++; children [n_children] = XmCreatePushButton (row, button_name, al, ac); if (! button) button = children [n_children]; -- 2.20.1