void view_region_callback(GtkWidget *w, gpointer context)
{
/* put up scrollable dialog describing/playing/editing the region list */
if (region_dialog == NULL)
make_region_dialog();
else
{
update_region_browser(true);
raise_dialog(region_dialog);
set_current_region(0);
}
}
static void make_edit_find_dialog(bool managed)
{
if (!edit_find_dialog)
{
Widget dl, rc;
Arg args[20];
int n;
XmString xmstr1, xmstr3, titlestr;
n = 0;
XtSetArg(args[n], XmNbackground, ss->basic_color); n++;
xmstr1 = XmStringCreateLocalized((char *)"Go Away");
xmstr3 = XmStringCreateLocalized((char *)"Previous");
titlestr = XmStringCreateLocalized((char *)"Find");
XtSetArg(args[n], XmNokLabelString, xmstr1); n++;
XtSetArg(args[n], XmNcancelLabelString, xmstr3); n++;
XtSetArg(args[n], XmNautoUnmanage, false); n++;
XtSetArg(args[n], XmNdialogTitle, titlestr); n++;
XtSetArg(args[n], XmNresizePolicy, XmRESIZE_GROW); n++;
XtSetArg(args[n], XmNnoResize, false); n++;
XtSetArg(args[n], XmNtransient, false); n++;
edit_find_dialog = XmCreateMessageDialog(MAIN_SHELL(ss), (char *)"find", args, n);
XmStringFree(xmstr1);
XmStringFree(xmstr3);
XmStringFree(titlestr);
XtUnmanageChild(XmMessageBoxGetChild(edit_find_dialog, XmDIALOG_SYMBOL_LABEL));
XtUnmanageChild(XmMessageBoxGetChild(edit_find_dialog, XmDIALOG_MESSAGE_LABEL));
XtAddCallback(edit_find_dialog, XmNhelpCallback, edit_find_help_callback, NULL);
XtAddCallback(edit_find_dialog, XmNcancelCallback, edit_find_previous_callback, NULL);
XtAddCallback(edit_find_dialog, XmNokCallback, edit_find_cancel_callback, NULL);
n = 0;
XtSetArg(args[n], XmNbackground, ss->highlight_color); n++;
XtSetArg(args[n], XmNarmColor, ss->selection_color); n++;
findnextB = XtCreateManagedWidget("Next", xmPushButtonGadgetClass, edit_find_dialog, args, n);
XtAddCallback(findnextB, XmNactivateCallback, edit_find_next_callback, NULL);
rc = XtCreateManagedWidget("row", xmFormWidgetClass, edit_find_dialog, NULL, 0);
n = 0;
XtSetArg(args[n], XmNleftAttachment, XmATTACH_FORM); n++;
XtSetArg(args[n], XmNbottomAttachment, XmATTACH_NONE); n++;
XtSetArg(args[n], XmNtopAttachment, XmATTACH_FORM); n++;
XtSetArg(args[n], XmNrightAttachment, XmATTACH_NONE); n++;
dl = XtCreateManagedWidget("find:", xmLabelWidgetClass, rc, args, n);
n = 0;
XtSetArg(args[n], XmNleftAttachment, XmATTACH_WIDGET); n++;
XtSetArg(args[n], XmNleftWidget, dl); n++;
XtSetArg(args[n], XmNbottomAttachment, XmATTACH_NONE); n++;
XtSetArg(args[n], XmNtopAttachment, XmATTACH_FORM); n++;
XtSetArg(args[n], XmNrightAttachment, XmATTACH_FORM); n++;
edit_find_text = make_textfield_widget("text", rc, args, n, ACTIVATABLE, add_completer_func(expression_completer, NULL));
n = 0;
XtSetArg(args[n], XmNleftAttachment, XmATTACH_FORM); n++;
XtSetArg(args[n], XmNbottomAttachment, XmATTACH_NONE); n++;
XtSetArg(args[n], XmNtopAttachment, XmATTACH_WIDGET); n++;
XtSetArg(args[n], XmNtopWidget, edit_find_text); n++;
XtSetArg(args[n], XmNrightAttachment, XmATTACH_FORM); n++;
XtSetArg(args[n], XmNmarginHeight, 10); n++;
edit_find_label = XtCreateManagedWidget(" ", xmLabelWidgetClass, rc, args, n);
n = 0;
XtSetArg(args[n], XmNbackground, ss->basic_color); n++;
XtSetArg(args[n], XmNtopAttachment, XmATTACH_WIDGET); n++;
XtSetArg(args[n], XmNtopWidget, edit_find_label); n++;
XtSetArg(args[n], XmNbottomAttachment, XmATTACH_FORM); n++;
XtSetArg(args[n], XmNleftAttachment, XmATTACH_FORM); n++;
XtSetArg(args[n], XmNrightAttachment, XmATTACH_FORM); n++;
XtSetArg(args[n], XmNallowResize, true); n++;
XtSetArg(args[n], XmNshadowType, XmSHADOW_ETCHED_IN); n++;
XtSetArg(args[n], XmNshadowThickness, 2); n++;
find_error_frame = XtCreateManagedWidget("find-error-frame", xmFrameWidgetClass, rc, args, n);
n = 0;
XtSetArg(args[n], XmNbackground, ss->highlight_color); n++;
find_error_label = XtCreateManagedWidget("", xmLabelWidgetClass, find_error_frame, args, n);
map_over_children(edit_find_dialog, set_main_color_of_widget);
XtVaSetValues(XmMessageBoxGetChild(edit_find_dialog, XmDIALOG_OK_BUTTON), XmNarmColor, ss->selection_color, NULL);
XtVaSetValues(XmMessageBoxGetChild(edit_find_dialog, XmDIALOG_CANCEL_BUTTON), XmNarmColor, ss->selection_color, NULL);
XtVaSetValues(XmMessageBoxGetChild(edit_find_dialog, XmDIALOG_HELP_BUTTON), XmNarmColor, ss->selection_color, NULL);
XtVaSetValues(XmMessageBoxGetChild(edit_find_dialog, XmDIALOG_OK_BUTTON), XmNbackground, ss->highlight_color, NULL);
XtVaSetValues(XmMessageBoxGetChild(edit_find_dialog, XmDIALOG_CANCEL_BUTTON), XmNbackground, ss->highlight_color, NULL);
XtVaSetValues(XmMessageBoxGetChild(edit_find_dialog, XmDIALOG_HELP_BUTTON), XmNbackground, ss->highlight_color, NULL);
cancelB = XmMessageBoxGetChild(edit_find_dialog, XmDIALOG_OK_BUTTON);
set_dialog_widget(FIND_DIALOG, edit_find_dialog);
XtUnmanageChild(find_error_frame);
if (managed) XtManageChild(edit_find_dialog);
{
Atom wm_delete_window;
wm_delete_window = XmInternAtom(MAIN_DISPLAY(ss), (char *)"WM_DELETE_WINDOW", false);
XmAddWMProtocolCallback(XtParent(edit_find_dialog), wm_delete_window, find_dialog_close, NULL);
}
}
else
{
if (managed)
{
if (!XtIsManaged(edit_find_dialog)) XtManageChild(edit_find_dialog);
raise_dialog(edit_find_dialog);
}
}
}
