[REBOL] FUNC defined globally didnt get through to layout/field/feel/engage . Need help

[Zhang, Yao]

Hi see below codes. 'redraw is newly defined function. In layout
'MyClips an unnamed field has its feel/engage programmed to call 'redraw

And that call failed,  cause in feel/engage 'redraw is none
What could be the solution? How to get object feel recognize the
definition of 'redraw ?



Thanks very,
-z


redraw: func [face data clip-pos] [
        either clip-pos =3D 0 [ clip-pos: to-integer face/text ] [
                face/text: to-string clip-pos=20
                ]
        selection: pick data clip-pos
        unless selection =3D none [
                trigit clipdisp copy selection
                show face
                ]
        ]

MyClips: layout [
    size f-size
        .....


    vh2 80x30 "00:00:00" rate 1 effect [gradient 0x1 0.0.150 0.0.50]
feel [
                engage: func [face act evt] [
                        face/text: now/time  show face
                        clip: read clipboard://
                        unless find rotaryClips clip [ append
rotaryClips clip ]
                        clip-pos: index? find rotaryClips clip
                        ? redraw        ; for debug, it reports "REDRAW
is a none of value: none"
                        redraw cliptrig rotaryClips clip-pos
                        ]
                ]
        ] ;layout


-- 
To unsubscribe from the list, just send an email to 
lists at rebol.com with unsubscribe as the subject.