Marcus,
you wrote:
> > This is what I use in my 'ls function found here:
> > http://users.bigpond.net.au/datababies/anton/rebol/dir-utils.r
>
> I downloaded that one a while ago together with shell.r (which someone
> else posted). Seems I forgot to check your script for an 'ls function.
>
> But still, what I get with your script is this (as I'm using Linux you
> might understand why it is a problem):
>
> >> ls *.R
> user.r
Ok, I didn't think about that.
I have added a /case refinement to 'ls which
shows the same problem as you are having.
(Download from above.)
Your match-file function seems to do the same
thing as my match code.
I want to check out your recurse as well.
It's neater than my tree. I implemented
a stack for mine. :)
I think it could be time to write our own
matching parse rules. I was thinking this
already but never got around to it.
Anton.
> match-file: function [file [file! string!]
> pattern [any-word! string!]] [match] [
> all [match: find/case/any/match to-string file pattern
> parse match ["/" | end]]]
>
>
>
>
> Marcus
--
To unsubscribe from this list, please send an email to
[EMAIL PROTECTED] with "unsubscribe" in the
subject, without the quotes.
