diff options
author | Richard M. Stallman <rms@gnu.org> | 1994-09-18 19:54:50 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1994-09-18 19:54:50 +0000 |
commit | f2adfb526fd1a94fc69d1e9051cafc34fca56ed4 (patch) | |
tree | 3ba70d958a64a389ba9f3c380e3d20c336af07b3 /lwlib/lwlib-Xm.c | |
parent | 221b3c849c8b5523b716349be0ec25642657a2d1 (diff) | |
download | emacs-f2adfb526fd1a94fc69d1e9051cafc34fca56ed4.tar.gz |
entered into RCS
Diffstat (limited to 'lwlib/lwlib-Xm.c')
-rw-r--r-- | lwlib/lwlib-Xm.c | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/lwlib/lwlib-Xm.c b/lwlib/lwlib-Xm.c index f56d22bf288..16d25ea20a7 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]; |