From: David Thompson <dthompson2@worcester.edu>
To: "Taylan Ulrich Bayırlı/Kammer" <taylanbayirli@gmail.com>,
guix-devel@gnu.org
Subject: Re: [PATCH] gnu: Add soundtouch.
Date: Sat, 21 Feb 2015 18:50:12 -0500 [thread overview]
Message-ID: <87r3tiakp7.fsf@fsf.org> (raw)
In-Reply-To: <874mqeluhj.fsf@taylan.uni.cx>
"Taylan Ulrich Bayırlı/Kammer" <taylanbayirli@gmail.com> writes:
> From 78cad66d5bb8dd5b4e46595574a4e58ce68d7849 Mon Sep 17 00:00:00 2001
> From: =?UTF-8?q?Taylan=20Ulrich=20Bay=C4=B1rl=C4=B1/Kammer?=
> <taylanbayirli@gmail.com>
> Date: Fri, 20 Feb 2015 21:44:57 +0100
> Subject: [PATCH 5/9] gnu: Add soundtouch.
>
> * gnu/packages/audio.scm (soundtouch): New variable.
> ---
> gnu/packages/audio.scm | 40 ++++++++++++++++++++++++++++++++++++++++
> 1 file changed, 40 insertions(+)
>
> diff --git a/gnu/packages/audio.scm b/gnu/packages/audio.scm
> index 51157d0..7fb39bd 100644
> --- a/gnu/packages/audio.scm
> +++ b/gnu/packages/audio.scm
> @@ -44,6 +44,7 @@
> #:use-module (gnu packages xiph)
> #:use-module (gnu packages xml)
> #:use-module (gnu packages autotools)
> + #:use-module (gnu packages file)
> #:use-module (srfi srfi-1))
>
> (define-public aubio
> @@ -681,3 +682,42 @@ stretching and pitch scaling of audio. This package contains the library.")
> ;; There is no explicit declaration of a license, but a COPYING file
> ;; containing gpl2.
> (license license:gpl2)))
> +
> +(define-public soundtouch
> + (package
> + (name "soundtouch")
> + (version "1.8.0")
> + (source
> + (origin
> + (method url-fetch)
> + (uri
> + (string-append
> + "http://www.surina.net/soundtouch/soundtouch-" version ".tar.gz"))
> + (sha256
> + (base32 "0sqn3wk4qz20vf0vz853l6dl1gnj1yhqxfwxqsc5lp529kbn2h9x"))))
> + (build-system gnu-build-system)
> + (native-inputs
> + `(("autoconf" ,autoconf)
> + ("automake" ,automake)
> + ("libtool" ,libtool)
> + ("file" ,file)))
> + (arguments
> + '(#:phases
> + (alist-cons-before
> + 'configure 'bootstrap
> + (lambda _
> + (and
> + (zero? (system* "sh" "bootstrap"))
> + (begin (substitute* '("configure")
> + (("/usr/bin/file") "file"))
> + #t)))
Is the 'begin' form necessary here? Also, when substituting a single
file, you can just pass a string instead of a list of strings.
(and
(zero? (system* "sh" "bootstrap"))
(substitute* "configure"
(("/usr/bin/file") "file")))
> + %standard-phases)))
> + (home-page "http://www.surina.net/soundtouch/")
> + (synopsis
> + "Audio processing library for changing tempo, pitch and playback rate")
> + (description
> + "SoundTouch is an audio processing library for changing the Tempo, Pitch
> +and Playback Rates of audio streams or audio files. It is intended for
> +application developers writing sound processing tools that require tempo/pitch
> +control functionality, or just for playing around with the sound effects.")
> + (license license:lgpl2.1+)))
> --
> 2.2.1
>
>
--
David Thompson
Web Developer - Free Software Foundation - http://fsf.org
GPG Key: 0FF1D807
Support the FSF: https://fsf.org/donate
next prev parent reply other threads:[~2015-02-21 23:50 UTC|newest]
Thread overview: 6+ messages / expand[flat|nested] mbox.gz Atom feed top
2015-02-21 23:23 [PATCH] gnu: Add soundtouch Taylan Ulrich Bayırlı/Kammer
2015-02-21 23:50 ` David Thompson [this message]
2015-02-22 1:01 ` Taylan Ulrich Bayırlı/Kammer
2015-02-24 17:41 ` Taylan Ulrich Bayırlı/Kammer
2015-02-24 20:05 ` Andreas Enge
2015-03-02 14:04 ` Mark H Weaver
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=87r3tiakp7.fsf@fsf.org \
--to=dthompson2@worcester.edu \
--cc=guix-devel@gnu.org \
--cc=taylanbayirli@gmail.com \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/guix.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.