Rebol Programming/dump-pane

USAGE:

DUMP-PANE face 

DESCRIPTION:

Print face info for entire pane. (for debugging)

DUMP-PANE is a function value.

ARGUMENTS

• face -- (Type: object)

SOURCE CODE

dump-pane: 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
]