~ruther/guix-local

fa5e6618593feab0c764652cd632f4e1bf6558a2 — Tobias Geerinckx-Rice 8 years ago cf52c92
gnu: iniparser: Use INSTALL-FILE.

* gnu/packages/samba.scm (iniparser)[arguments]: Simplify ‘install’ phase by
replacing COPY-FILE with INSTALL-FILE.
1 files changed, 7 insertions(+), 12 deletions(-)

M gnu/packages/samba.scm
M gnu/packages/samba.scm => gnu/packages/samba.scm +7 -12
@@ 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")