Rebol Programming/request-list

= USAGE: = REQUEST-LIST titl alist /offset xy

= DESCRIPTION: = Requests a selection from a list.

REQUEST-LIST is a function value. = ARGUMENTS =
 * titl -- (Type: string)
 * alist -- (Type: block)

= REFINEMENTS =
 * /offset
 * xy -- (Type: any)

= SOURCE CODE = request-list: func [ "Requests a selection from a list." titl [string!] alist [block!] /offset xy /local rslt list-lay ][   list-lay: layout [ origin 10x10 h3 titl text-list data alist [rslt: value hide-popup] btn-cancel #"^[" [rslt: none hide-popup] ]    rslt: none either offset [inform/offset list-lay xy] [inform list-lay] rslt ]