Directory Walker Conundrum

[Sivakatirswami]

David and Alex, Aloha, Thank you!

I always tell people "Oh yes, the other thing about Revolution, is,  
its rare not to get a solution with 18 hours...."

Of course, only if you don't ask for the Cheese In The Moon... no one  
responded to my query as to whether  one could apply unsharpMask to a  
photo in revolution. Like a great sage once said: "You can do  
anything, but don't try to fly like a bird."

Sivakatirswami


On May 28, 2006, at 2:06 PM, David Vaughan wrote:

> On 29/05/2006, at 9:52, Alex Tweedly wrote:
>>
>> change
>>   delete line 1 of tDirList
>> to something like
>>   filter tDirList without ".."
>
> This one works anyway, and also does not suffer from a couple of  
> other bugs which exist in Ken's older version, to do with  
> permissions and infinite recursion in OS X and possibly other 'nixes.
>
> -- This recursive function expects a folder path.
> -- It returns a file list for that folder and for each
> --  sub-folder it contains (pre-order search)
> -- Invisible files are excluded.
> function walkDir dirPath
>   if dirPath contains "//Network" then
>     return empty
>   end if
>   put empty into tList
>   set defaultFolder to dirPath
>   -- Dar's discovery. Check permissions were ok
>   get the Result
>   if it is not empty then
>     return empty
>   end if
>   put the long files into fList
>   repeat for each line fLine in fList
>     if char 1 of fLine <> "." then
> -- Change this line to determine what components are returned
>       put dirPath & "/" & item 1 of fLine & comma & item -2 to -1  
> of fLine & return after tList
>     end if
>   end repeat
>   get the folders
>   repeat for each line x in it
>     if char 1 of x <> "." then
>       put walkDir(dirPath & "/" & x) after tList
>     end if
>   end repeat
>   return tList
> end walkDir
>
> regards
> David
> _______________________________________________
> use-revolution mailing list
> use-revolution at lists.runrev.com
> Please visit this url to subscribe, unsubscribe and manage your  
> subscription preferences:
> http://lists.runrev.com/mailman/listinfo/use-revolution