Mailing List Archive: Re: Slide show from Collaboration

[REBOL] Re: Slide show from Collaboration

From: Izkata:Comcast at: 4-Oct-2004 18:49


> 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
>
> :(

Dang a Native or I'd just copy the source lol -

>> ? unless
USAGE:
    UNLESS condition block

DESCRIPTION:
     Evaluates the block if condition is not TRUE.
     UNLESS is a native value.

ARGUMENTS:
     condition -- (Type: any)
     block -- (Type: block)

I am using V 1.2.46.3.1 which I got from
http://www.rebol.net/projects/view1.3/downloads/