LISTING 1

Widget		w;
Arg		arglist[10];
Cardinal 	n;
XmString	label1, label2;
extern void	saveas_file();

n = 0;
label1 = XmStringCreate("save file",
                        XmSTRING_DEFAULT_CHARSET);
XtSetArg(arglist[n], XmNdialogTitle, label);	n++;
label2 = XmStringCreate("Save as what file?",
                        XmSTRING_DEFAULT_CHARSET);
XtSetArg(arglist[n], XmNselectionLabelString, label2);	n++;

w = XmCreatePromptDialog(parent, "pushbutton1", arglist, n);

XtAddCallback(w, XmNactivateCallback, saveas_file, NULL);
