#!/usr/dt/bin/dtksh
okCB() {
	exit 0
}
XtInitialize TOPLEVEL msg Dtksh $0
XmCreateMessageBox MSG $TOPLEVEL MessageBox \
	messageString:"Can't find $1"
XtAddCallback $MSG okCallback okCB
XmMessageBoxGetChild CANCEL $MSG DIALOG_CANCEL_BUTTON
XtUnmanageChild $CANCEL
XmMessageBoxGetChild HELP $MSG DIALOG_HELP_BUTTON
XtUnmanageChild $HELP
XtManageChild $MSG
XtRealizeWidget $TOPLEVEL
XtMainLoop