Rebol Programming/dump-face

= USAGE: = DUMP-FACE face

= DESCRIPTION: = Print face info for entire pane. (for debugging)

DUMP-FACE is a function value. = ARGUMENTS =
 * face -- (Type: object)

= SOURCE CODE = dump-face: func [ "Print face info for entire pane. (for debugging)" face [object!] /local depth style ][   depth: "" print [depth "Style:" all [in face 'style face/style] "Offset:" face/offset "Size:" face/size "Text:" if face/text [copy/part form face/text 20] ]    insert depth tab if object? face/pane [dump-face face/pane] if block? face/pane [foreach f face/pane [dump-face f]] remove depth ]