[REBOL] Re: [VID][edge] How do I remove 'bevel from edge?

2004-02-14 Thread Ashley Trter
Thanks Gabriele, The line: if face/edge [face/edge/effect: pick [ibevel bevel] face/state] is the culprit. I've now got it working by this simple addition to the 'init block: feel/redraw: func [face act pos][ face/text: either face/state [face/texts/2]

[REBOL] Re: [VID][edge] How do I remove 'bevel from edge?

2004-02-14 Thread Brett Handley
Hi Ashley, I've now got it working by this simple addition to the 'init block: feel/redraw: func [face act pos][ face/text: either face/state [face/texts/2] [face/texts/1] ] There is only one small problem with your change - you are modifying the shared feel object. Instead of using init,

[REBOL] Re: [VID][edge] How do I remove 'bevel from edge?

2004-02-13 Thread Gabriele Santilli
Hi Ashley, On Friday, February 13, 2004, 7:17:06 AM, you wrote: AT even though edge/effect is set to 'none. So the question is, how can I AT set edge/effect to 'none? Look at the REDRAW feel: redraw: func [face act pos /local state][ if all [face/texts face/texts/2] [