Ludo',

On 13/09/16 14:11, Ludovic Courtès wrote:
> However, ‘find-files’ does not include directories in its result, 
> unless you explicitly ask for it.  So probably it should be:
> 
> (for-each delete-file-recursively (find-files "internal" "^tinyxml2" 
> #:directories? #t))

Indeed, thanks. I'll push with the more specific

    (snippet '(for-each delete-file-recursively
                        (find-files "internal" "^tinyxml2-[0-9]"
                                    #:directories? #t)))))

unless anyone raises any objections. Otherwise, find-files returns some
matching subdirectories as well (‘^tinyxml2-.*/.*/tinyxml2-.*’) which
delete-file-recursively still tries to delete after the parent is gone.

Kind regards,

T G-R