#! ../mofe --f
mergeResources topLevel \
    *XmPushButton.activateCallback {manageChild Xm%w} \
    *Help.sensitive false

XmRowColumn rc topLevel
XmPushButton MessageDialog rc 
XmPushButton ErrorDialog rc 
XmPushButton InformationDialog rc 
XmPushButton QuestionDialog rc 
XmPushButton WarningDialog rc 
XmPushButton WorkingDialog rc 
XmPushButton Quit rc activateCallback quit background red foreground black

XmInformationDialog XmInformationDialog InformationDialog unmanaged \
	messageString "This is some Info, you should know!"
XmQuestionDialog XmQuestionDialog QuestionDialog unmanaged \
	messageString "Do you want to continue?"
XmMessageDialog XmMessageDialog MessageDialog unmanaged \
	messageString "This is a Message."
XmWarningDialog XmWarningDialog WarningDialog unmanaged \
	messageString "Are you sure?"
XmWorkingDialog XmWorkingDialog WorkingDialog unmanaged \
	messageString "Working hard..."
XmErrorDialog XmErrorDialog ErrorDialog unmanaged \
	messageString "This should never happen..."
realize