Hi Phil,

On Thursday, December 11, 2003, 4:41:52 AM, you wrote:

puc> Does anyone know why I had to insert the ugly line
puc>    if all [sl/data = 1 tmp = 1] [tmp: 0.999]
puc> in this code.

IIRC this is a workaround for a bug in slider/redrag.

I use this patch that fixes the bug:

        Slider: Slider with [
            use [c] [
                c: second :redrag
                either 15470763 = checksum mold c [
                    insert c [state: none]
                ] [print "CANNOT APPLY SLIDER PATCH!"]
            ]
        ]
        Scroller: Scroller with [
            use [c] [
                c: second :redrag
                either 15470763 = checksum mold c [
                    insert c [state: none]
                ] [print "CANNOT APPLY SCROLLER PATCH!"]
            ]
        ]

Regards,
   Gabriele.
-- 
Gabriele Santilli <[EMAIL PROTECTED]>  --  REBOL Programmer
Amiga Group Italia sez. L'Aquila  ---   SOON: http://www.rebol.it/

-- 
To unsubscribe from this list, just send an email to
[EMAIL PROTECTED] with unsubscribe as the subject.

Reply via email to