Jump to content

Rebol Programming/reset-face

From Wikibooks, open books for an open world

USAGE:

[edit | edit source]
RESET-FACE face /no-show 

DESCRIPTION:

[edit | edit source]

Resets the primary value of a face.

RESET-FACE is a function value.

ARGUMENTS

[edit | edit source]
  • face -- (Type: any)

REFINEMENTS

[edit | edit source]
  • /no-show -- Do not show change yet

SOURCE CODE

[edit | edit source]
reset-face: func [
    "Resets the primary value of a face." 
    face 
    /no-show "Do not show change yet" 
    /local access
][
    if all [
        access: get in face 'access 
        in access 'reset-face*
    ] [
        access/reset-face* face
    ] 
    if not no-show [show face] 
    face
]