diff options
author | Tobias Geerinckx-Rice <me@tobias.gr> | 2018-01-15 07:30:03 +0100 |
---|---|---|
committer | Tobias Geerinckx-Rice <me@tobias.gr> | 2018-01-15 14:58:33 +0100 |
commit | fa5e6618593feab0c764652cd632f4e1bf6558a2 (patch) | |
tree | 21b9449692ed1166d43142fe7564eed3ed54f568 | |
parent | cf52c9255d00323f4b1f11a0279aa28e0bfce624 (diff) | |
download | guix-fa5e6618593feab0c764652cd632f4e1bf6558a2.tar guix-fa5e6618593feab0c764652cd632f4e1bf6558a2.tar.gz |
gnu: iniparser: Use INSTALL-FILE.
* gnu/packages/samba.scm (iniparser)[arguments]: Simplify ‘install’ phase by
replacing COPY-FILE with INSTALL-FILE.
-rw-r--r-- | gnu/packages/samba.scm | 19 |
1 files changed, 7 insertions, 12 deletions
diff --git a/gnu/packages/samba.scm b/gnu/packages/samba.scm index 88c2df6675..4de8d89219 100644 --- a/gnu/packages/samba.scm +++ b/gnu/packages/samba.scm @@ -124,23 +124,18 @@ the Linux kernel CIFS client.") (inc (string-append out "/include")) (doc (string-append out "/share/doc/" ,name)) (html (string-append doc "/html"))) - (define (copy dir) + (define (install dir) (lambda (file) - (copy-file file - (string-append dir "/" - (basename file))))) - (mkdir-p lib) - (for-each (copy lib) - (find-files "." "^lib.*\\.(so\\.|a)")) + (install-file file dir))) + (for-each (install lib) + (find-files "." "^lib.*\\.so")) (with-directory-excursion lib (symlink "libiniparser.so.0" "libiniparser.so")) - (mkdir-p inc) - (for-each (copy inc) + (for-each (install inc) (find-files "src" "\\.h$")) - (mkdir-p html) - (for-each (copy html) + (for-each (install html) (find-files "html" ".*")) - (for-each (copy doc) + (for-each (install doc) '("AUTHORS" "INSTALL" "LICENSE" "README.md")))))))) (home-page "http://ndevilla.free.fr/iniparser") (synopsis "Standalone ini file parsing library") |