01/02: gnu: kaldi: Install headers and fix installation of libraries.

[guix-commits]

rekado pushed a commit to branch master
in repository guix.

commit 1fdd20c7d7ac53ccd898ab684e6c2b4d1f4cf907
Author: Ricardo Wurmus <address@hidden>
Date:   Thu Mar 14 23:28:51 2019 +0100

    gnu: kaldi: Install headers and fix installation of libraries.
    
    * gnu/packages/machine-learning.scm (kaldi)[arguments]: Fix installation of
    libraries and install headers in "install" phase.
---
 gnu/packages/machine-learning.scm | 16 +++++++++++++++-
 1 file changed, 15 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/machine-learning.scm 
b/gnu/packages/machine-learning.scm
index 4067b4b..b36186e 100644
--- a/gnu/packages/machine-learning.scm
+++ b/gnu/packages/machine-learning.scm
@@ -1002,9 +1002,23 @@ association studies (GWAS) on extremely large data 
sets.")
            (replace 'install
              (lambda* (#:key outputs #:allow-other-keys)
                (let* ((out (assoc-ref outputs "out"))
+                      (inc (string-append out "/include"))
                       (lib (string-append out "/lib")))
                  (mkdir-p lib)
-                 (install-file "gst-plugin/libgstonlinegmmdecodefaster.so" lib)
+                 ;; The build phase installed symlinks to the actual
+                 ;; libraries.  Install the actual targets.
+                 (for-each (lambda (file)
+                             (let ((target (readlink file)))
+                               (delete-file file)
+                               (install-file target lib)))
+                           (find-files lib "\\.so"))
+                 ;; Install headers
+                 (for-each (lambda (file)
+                             (let ((target-dir (string-append inc "/" (dirname 
file))))
+                               (install-file file target-dir)))
+                           (find-files "." "\\.h"))
+                 (install-file "gst-plugin/libgstonlinegmmdecodefaster.so"
+                               (string-append lib "/gstreamer-1.0"))
                  #t))))))
       (inputs
        `(("alsa-lib" ,alsa-lib)