From 48efe19639d58a01b71ade46aec7ba06fe9d09c4 Mon Sep 17 00:00:00 2001 From: Linas Vepstas Date: Mon, 26 Jan 1998 10:11:00 +0000 Subject: [PATCH] tab group foolishness git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@445 57a11ea4-9604-0410-9ed3-97b8803252fd --- src/RegWindow.c | 14 ++++++++++++-- 1 file changed, 12 insertions(+), 2 deletions(-) diff --git a/src/RegWindow.c b/src/RegWindow.c index 430768afc1..2058667303 100644 --- a/src/RegWindow.c +++ b/src/RegWindow.c @@ -448,8 +448,14 @@ regWindowLedger( Widget parent, Account **acclist, int ledger_type ) xmFormWidgetClass, pane, XmNfractionBase, 6, XmNresizable, False, + XmNtraversalOn, True, + XmNnavigationType, XmSTICKY_TAB_GROUP, NULL ); - + + /* traverse to the buttons, when leaving the table */ + xaccNextTabGroup (regData->ledger->table, buttonform); + + position = 0; /* puts the buttons in the right place */ /* The "Record" button */ @@ -462,11 +468,14 @@ regWindowLedger( Widget parent, Account **acclist, int ledger_type ) XmNrightAttachment, XmATTACH_POSITION, XmNrightPosition, position+1, XmNshowAsDefault, True, + XmNnavigationType, XmTAB_GROUP, NULL ); XtAddCallback( widget, XmNactivateCallback, recordCB, (XtPointer)regData ); regData->record = widget; + + /* The "Cancel" button */ position++; @@ -479,6 +488,7 @@ regWindowLedger( Widget parent, Account **acclist, int ledger_type ) XmNrightAttachment, XmATTACH_POSITION, XmNrightPosition, position+1, XmNshowAsDefault, True, + XmNnavigationType, XmTAB_GROUP, NULL ); XtAddCallback( widget, XmNactivateCallback, @@ -495,7 +505,7 @@ regWindowLedger( Widget parent, Account **acclist, int ledger_type ) XmNrightAttachment, XmATTACH_POSITION, XmNrightPosition, position+1, XmNshowAsDefault, True, - XmNnavigationType, XmNONE, /* stop tabbing ! */ + XmNnavigationType, XmTAB_GROUP, NULL ); XtAddCallback( widget, XmNactivateCallback,