Federico Beffa writes:
> Please find attached a pyparsing package for review.
[...]
> + (with-directory-excursion "docs"
> + (map (lambda (file)
> + (copy-file file (string-append doc "/" file)))
> + (find-files "." ".*")))
> + (with-directory-excursion "htmldoc"
> + (map (lambda (file)
> + (copy-file file (string-append html-doc "/" file)))
> + (find-files "." ".*")))
> + (with-directory-excursion "examples"
> + (map (lambda (file)
> + (copy-file file (string-append examples "/" file)))
> + (find-files "." ".*")))))
Perhaps:
(for-each
(lambda (dir tgt)
(for-each (lambda (file)
(copy-file file
(string-append tgt "/" (basename file))))
(find-files dir ".*")))
(list "docs" "htmldoc" "examples")
(list doc html-doc exmples)
Not tested of course ;)
Also, try running the package through `guix lint`.
--
Eric Bavier
Please avoid sending me Word or PowerPoint attachments.
See http://www.gnu.org/philosophy/no-word-attachments.html
