This one and the one before won't work as asked because they'll return
true for files with r~ anywhere in the name. Try this instead (off the top
of my head):
has-backup-file?: func [
{Returns true if any item in block ends with r~}
arg [block!]
][
forall arg [
if (result: find first arg "r~") [
if (length? result) = 2 [
return true
]
]
]
return false
]
On Thu, 7 Sep [EMAIL PROTECTED] wrote:
>
> Hi,
>
> Or even -
> test-for-ext: func [
> "Search a block for items ending with the given string. Returns TRUE or
> FALSE"
> value [string!]
> data [block!]
> ] [
> foreach item data [
> if find/last item value [ return true ]
> false
> ]
> ]
>
> cheers, john
> >
> I have a block which contains filenames. I would like to get a true or
> false value back indicating whether or not there is a filename in the block
> that terminates with a r~ extension.
>
> Please show me how to do this.
>
> >> a
> == [%cast.r %feedback.r %ftp.r %ftp.r~ %instinet.r %instinet.r~ %lconfig.r
> %lconfig.r~ %nntp.r %notes.html %rebdoc.r
> %rebol.exe %re...
>
> Could someone show me how to glob for feedback.r?
>
> In other words, I want to say
>
>
> Get your FREE Email and Voicemail at Lycos Communications at
> http://comm.lycos.com
>
>
>
>
>
