From cb7badd92a2920ca863cc45af6b58e89ea9e5a9f Mon Sep 17 00:00:00 2001 From: "Eric S. Raymond" Date: Wed, 13 Sep 2006 17:57:12 +0000 Subject: [PATCH] Beginnings of a button panel. --- src/xio.c | 24 ++++++++++++++---------- 1 file changed, 14 insertions(+), 10 deletions(-) diff --git a/src/xio.c b/src/xio.c index ea13d05..63facea 100644 --- a/src/xio.c +++ b/src/xio.c @@ -7,7 +7,7 @@ #include XtAppContext app_context; -Widget toplevel, form, quit, text; +Widget toplevel, form, buttons, quit, destruct, text; void quit_proc (Widget w, XtPointer client_data, XtPointer call_data) { @@ -21,18 +21,22 @@ int main (int argc, char **argv) argv, NULL, applicationShellWidgetClass, XtNallowShellResize, True, NULL); form = XtVaCreateManagedWidget ("form", formWidgetClass, toplevel, NULL); - quit = XtVaCreateManagedWidget ("quit", commandWidgetClass, form, XtNlabel, - "Quit", NULL); + buttons = XtVaCreateManagedWidget ("form", formWidgetClass, form, NULL); + quit = XtVaCreateManagedWidget("quit", + commandWidgetClass, buttons, + XtNlabel, "Quit", NULL); + destruct = XtVaCreateManagedWidget("destruct", + commandWidgetClass, buttons, + XtNfromHoriz, quit, + XtNlabel, "Destruct", NULL); text = XtVaCreateManagedWidget ("text", asciiTextWidgetClass, form, - XtNfromVert, quit, XtNresize, + XtNfromVert, buttons, XtNresize, XawtextResizeBoth, XtNresizable, True, NULL); XtAddCallback (quit, XtNcallback, quit_proc, NULL); - if (argc <= 1) - XtVaSetValues (text, XtNtype, XawAsciiString, - XtNstring, "Fool! You should" - " supply a file name!", NULL); - else - XtVaSetValues (text, XtNtype, XawAsciiFile, XtNstring, argv [1], NULL); + + /* sample text so the widget will be identifiable */ + XtVaSetValues (text, XtNtype, XawAsciiString, + XtNstring, "Command window", NULL); XtVaSetValues (text, XtNeditType, XawtextRead, XtNdisplayCaret, False, NULL); XtRealizeWidget (toplevel); XtAppMainLoop (app_context); -- 2.31.1