Now that the dialog box is finished, it can be saved to a new name, such as quit-dialog.
We can use the dialog box in an application with the following code:
source quit-dialog.ui.tcl ... quit-dialog_ui [toplevel .quit?]