[REBOL] Re: Search string x for any substring found in block y.

[Andrew Martin]

Louis wrote:
>           findany: func [

Try:        find-any: func [

>           if find x y/count [true break]

Try:        if found? find x y/:count [return true]

> if findany x y [print found]

Try:        if find-any x y [print "found"]

And this is a better replacement for 'findany:

        find-any: func [x [string!] Strings[block!]][
            foreach String Strings [
                if found? find x String [return true]
                ]
            ]

I hope that helps somewhat!

Andrew Martin
ICQ: 26227169 http://valley.150m.com/
-><-



-- 
To unsubscribe from this list, please send an email to
[EMAIL PROTECTED] with "unsubscribe" in the 
subject, without the quotes.