guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

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


From: Kei Kebreau
Subject: 05/05: gnu: libextractor: Move .a files to output "static".
Date: Thu, 9 Feb 2017 12:16:08 -0500 (EST)

kkebreau pushed a commit to branch master
in repository guix.

commit ff71196067a97bd378a4f1b0ae2b78384b78377d
Author: ng0 <address@hidden>
Date:   Thu Feb 9 13:37:04 2017 +0000

    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 <address@hidden>
---
 gnu/packages/gnunet.scm | 19 ++++++++++++++++++-
 1 file changed, 18 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/gnunet.scm b/gnu/packages/gnunet.scm
index f7da12a..a4514a7 100644
--- a/gnu/packages/gnunet.scm
+++ b/gnu/packages/gnunet.scm
@@ -115,13 +115,30 @@
       ("zlib" ,zlib)))
    (native-inputs
     `(("pkg-config" ,pkg-config)))
+   (outputs '("out"
+              "static")) ; 396 KiB .a files
    (arguments
     `(#:configure-flags
       (list (string-append "--with-ltdl="
                            (assoc-ref %build-inputs "libltdl"))
             (string-append "--with-tidy="
                            (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")
    (description
     "GNU libextractor is a library for extracting metadata from files.  It



reply via email to

[Prev in Thread] Current Thread [Next in Thread]