A J Martin napsal(a):

>Ladislav wrote:
>  
>
>>my slide-show can be run in View/beta as follows:
>>
>>do http://www.fm.vslib.cz/~ladislav/rebol/present.r
>>    
>>
>
>
>  
>
>>>do http://www.fm.vslib.cz/~ladislav/rebol/present.r
>>>      
>>>
>** Script Error: unless has no value
>** Where: tfunc
>** Near: unless string? pick spec 1
>
>:(
>
>  
>
Hi Andrew,

you can define Unless as follows:

    unless: func [
        "Evaluates the block if condition is not TRUE."
        [throw]
        condition
        block [block!]
    ] [
        either condition [none] block
    ]

, but I am not sure that is everything what is needed to run the script

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

Reply via email to