[PATCH] gnu: vamp: Delete broken files from output.

[PATCH] gnu: vamp: Delete broken files from output.

[Taylan Ulrich Bayırlı/Kammer]

[-- Attachment #1: Type: text/plain, Size: 71 bytes --]

This bit me while building Audacity.  (Bunch of patches coming soon!)


[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: patch --]
[-- Type: text/x-diff, Size: 1960 bytes --]

From 13f91105c99dda0b8d68b3db2f08149326276eac Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Taylan=20Ulrich=20Bay=C4=B1rl=C4=B1/Kammer?=
 <taylanbayirli@gmail.com>
Date: Sat, 21 Feb 2015 16:37:46 +0100
Subject: [PATCH 1/9] gnu: vamp: Delete broken files from output.

See <https://bugs.launchpad.net/ubuntu/+source/vamp-plugin-sdk/+bug/1253656>.

* gnu/packages/audio.scm (vamp): Delete "/lib/libvamp-sdk.la" and
  "/lib/libvamp-hostsdk.la" from the output directory after the install
  phase.
---
 gnu/packages/audio.scm | 20 ++++++++++++++++----
 1 file changed, 16 insertions(+), 4 deletions(-)

diff --git a/gnu/packages/audio.scm b/gnu/packages/audio.scm
index 6e7ebf1..3d0f0f4 100644
--- a/gnu/packages/audio.scm
+++ b/gnu/packages/audio.scm
@@ -582,11 +582,23 @@ Suil currently supports every combination of Gtk 2, Qt 4, and X11.")
                     "/attachments/download/690/vamp-plugin-sdk-"
                     version
                     ".tar.gz"))
-             (sha256
-              (base32
-               "178kfgq08cmgdzv7g8dwyjp4adwx8q04riimncq4nqkm8ng9ywbv"))))
+              (sha256
+               (base32
+                "178kfgq08cmgdzv7g8dwyjp4adwx8q04riimncq4nqkm8ng9ywbv"))))
     (build-system gnu-build-system)
-    (arguments `(#:tests? #f)) ; no check target
+    (arguments
+     `(#:tests? #f                      ; no check target
+       #:phases
+       (alist-cons-after
+        'install 'remove-libvamp-hostsdk.la
+        (lambda* (#:key outputs #:allow-other-keys)
+          ;; https://bugs.launchpad.net/ubuntu/+source/vamp-plugin-sdk/+bug/1253656
+          (for-each delete-file
+                    (let ((out (assoc-ref outputs "out")))
+                      (list (string-append out "/lib/libvamp-sdk.la")
+                            (string-append out "/lib/libvamp-hostsdk.la"))))
+          #t)
+        %standard-phases)))
     (inputs
      `(("libsndfile" ,libsndfile)))
     (native-inputs
-- 
2.2.1

Re: [PATCH] gnu: vamp: Delete broken files from output.

[Andreas Enge]

On Sat, Feb 21, 2015 at 04:48:26PM +0100, Taylan Ulrich Bayırlı/Kammer wrote:
> This bit me while building Audacity.  (Bunch of patches coming soon!)

Looks good, please push!

Andreas