summary refs log tree commit diff
diff options
context:
space:
mode:
authorSughosha <sughosha@disroot.org>2023-07-03 22:52:18 +0200
committer宋文武 <iyzsong@member.fsf.org>2023-07-18 20:23:42 +0800
commitd1a76ac512cb0dab5fb8401e4d587f83042a7758 (patch)
tree989a9a38696836fac2d47975bd58fa94f4380470
parentbf6727fadf59dcd14f727a572b49c61bb9092108 (diff)
downloadguix-d1a76ac512cb0dab5fb8401e4d587f83042a7758.tar.gz
gnu: ardour: Install bundled MIDI loops.
* gnu/packages/audio.scm (ardour)[#:phases]: Add install-bundled-media.
[native-inputs]: Add unzip.
[license]: Add cc0 and expat.

Signed-off-by: 宋文武 <iyzsong@member.fsf.org>
-rw-r--r--gnu/packages/audio.scm24
1 files changed, 21 insertions, 3 deletions
diff --git a/gnu/packages/audio.scm b/gnu/packages/audio.scm
index e35e44febb..2e2632f356 100644
--- a/gnu/packages/audio.scm
+++ b/gnu/packages/audio.scm
@@ -736,6 +736,14 @@ purposes developed at Queen Mary, University of London.")
                          libdir "/surfaces" ":"
                          libdir "/vamp" "\"]"))))))
 
+(define ardour-bundled-media
+  (origin
+    (method url-fetch)
+    (uri "http://stuff.ardour.org/loops/ArdourBundledMedia.zip")
+    (sha256
+     (base32
+      "0k135sm559yywfidrya7h5cddwqa2p2abhimrar2khydf43f03d0"))))
+
 (define-public ardour
   (package
     (name "ardour")
@@ -794,7 +802,14 @@ namespace ARDOUR { const char* revision = \"" version "\" ; const char* date = \
          (add-after 'install 'install-man-page
            (lambda* (#:key outputs #:allow-other-keys)
              (install-file "ardour.1" (string-append (assoc-ref outputs "out")
-                                                     "/share/man/man1")))))
+                                                     "/share/man/man1"))))
+         (add-after 'install 'install-bundled-media
+           (lambda* (#:key outputs #:allow-other-keys)
+             (invoke "unzip" "-d" (string-append (assoc-ref outputs "out")
+                                                 "/share/ardour"
+                                                 ,(version-major version)
+                                                 "/media/")
+                     ,ardour-bundled-media))))
        #:test-target "test"))
     (inputs
      (list alsa-lib
@@ -849,14 +864,17 @@ namespace ARDOUR { const char* revision = \"" version "\" ; const char* date = \
            gettext-minimal
            itstool
            perl
-           pkg-config))
+           pkg-config
+           unzip))
     (home-page "https://ardour.org")
     (synopsis "Digital audio workstation")
     (description
      "Ardour is a multi-channel digital audio workstation, allowing users to
 record, edit, mix and master audio and MIDI projects.  It is targeted at audio
 engineers, musicians, soundtrack editors and composers.")
-    (license license:gpl2+)))
+    (license (list license:gpl2+
+                   license:cc0 ;used by MIDI Beats
+                   license:expat)))) ;used by MIDI Chords and Progressions
 
 (define-public audacity
   (package