Function Do-Dialog

Part of:

package weblocks
( do-dialog &rest < args > )