3
5
Fork 0
mirror of git://git.savannah.gnu.org/guix.git synced 2023-12-14 03:33:07 +01:00

gnu: libextractor: Move .a files to output "static".

* gnu/packages/gnunet.scm (libextractor): Move .a files to "static" output.
[arguments](phases): New phase for moving .a files to output "static".

Signed-off-by: Kei Kebreau <kei@openmailbox.org>
This commit is contained in:
ng0 2017-02-09 13:37:04 +00:00 committed by Kei Kebreau
parent b0a2adddc8
commit ff71196067
No known key found for this signature in database
GPG key ID: E6A5EE3C19467A0D

View file

@ -115,13 +115,30 @@
("zlib" ,zlib))) ("zlib" ,zlib)))
(native-inputs (native-inputs
`(("pkg-config" ,pkg-config))) `(("pkg-config" ,pkg-config)))
(outputs '("out"
"static")) ; 396 KiB .a files
(arguments (arguments
`(#:configure-flags `(#:configure-flags
(list (string-append "--with-ltdl=" (list (string-append "--with-ltdl="
(assoc-ref %build-inputs "libltdl")) (assoc-ref %build-inputs "libltdl"))
(string-append "--with-tidy=" (string-append "--with-tidy="
(assoc-ref %build-inputs "tidy-html"))) (assoc-ref %build-inputs "tidy-html")))
#:parallel-tests? #f)) #:parallel-tests? #f
#:phases
(modify-phases %standard-phases
(add-after 'install 'move-static-libraries
(lambda* (#:key outputs #:allow-other-keys)
;; Move static libraries to the "static" output.
(let* ((out (assoc-ref outputs "out"))
(lib (string-append out "/lib"))
(static (assoc-ref outputs "static"))
(slib (string-append static "/lib")))
(mkdir-p slib)
(for-each (lambda (file)
(install-file file slib)
(delete-file file))
(find-files lib "\\.a$"))
#t))))))
(synopsis "Library to extract meta-data from media files") (synopsis "Library to extract meta-data from media files")
(description (description
"GNU libextractor is a library for extracting metadata from files. It "GNU libextractor is a library for extracting metadata from files. It