Changeset 114 for functions/set-values.r

Show
Ignore:
Timestamp:
09/07/08 03:38:37 (3 months ago)
Author:
ashley
Message:

Added /no-show refinement to set-values.r, updated pill.r and fixed face-iterator in widgets.r

Files:
1 modified

Legend:

Unmodified
Added
Removed

  • functions/set-values.r

    r112 r114  
    33        face [object!] "Display face" 
    44        blk [block!] "Block of values (or 'skip)" 
     5        /no-show "Don't show" 
    56        /local val 
    67] [ 
    … …  
    1718                                        check                   [widget/data: val] 
    1819                                        check-group             [all [block? val insert clear widget/data val]] 
    19                                         group-box               [all [block? val set-values widget copy/deep val]] 
     20                                        group-box               [all [block? val set-values/no-show widget copy/deep val]] 
    2021                                        radio-group             [widget/select-item to integer! val] 
    21                                         scroll-panel    [all [block? val set-values widget copy/deep val]] 
     22                                        scroll-panel    [all [block? val set-values/no-show widget copy/deep val]] 
    2223                                        slider                  [widget/data: to decimal! val] 
    23                                         tab-panel               [all [block? val set-values widget copy/deep val]] 
     24                                        tab-panel               [all [block? val set-values/no-show widget copy/deep val]] 
    2425                                        table                   [widget/select-row val] 
    2526                                        text-list               [widget/select-row val] 
    … …  
    3637        ] 
    3738        blk: head blk 
     39        unless no-show [show face] 
    3840]