Rebol Programming/insert-event-func

= USAGE: = INSERT-EVENT-FUNC funct

= DESCRIPTION: = Add a function to monitor global events. Return the func.

INSERT-EVENT-FUNC is a function value. = ARGUMENTS: =
 * funct -- A function or a function body block (Type: block function)

= SOURCE CODE = insert-event-func: func [ {Add a function to monitor global events. Return the func.} funct [block! function!] "A function or a function body block" ][   if block? :funct [funct: func [face event] funct] insert system/view/screen-face/feel/event-funcs :funct :funct ]