Rebol Programming/set-face

USAGE:

edit
SET-FACE face value /no-show 

DESCRIPTION:

edit

Sets the primary value of a face. Returns face object (for show).

SET-FACE is a function value.

ARGUMENTS

edit
  • face -- (Type: any)
  • value -- (Type: any)

REFINEMENTS

edit
  • /no-show -- Do not show change yet

SOURCE CODE

edit
set-face: func [
    {Sets the primary value of a face. Returns face object (for show).} 
    face 
    value 
    /no-show "Do not show change yet" 
    /local access
][
    if all [
        access: get in face 'access 
        in access 'set-face*
    ] [
        access/set-face* face value
    ] 
    if not no-show [show face] 
    face
]