Re: [PATCH] Add Qtractor.

[Leo Famulari]

On Sun, Jan 17, 2016 at 05:11:51PM +0100, Ricardo Wurmus wrote:
> From ab732cfc4a8827c40000c455a1bb29a5e87a14d9 Mon Sep 17 00:00:00 2001
> From: Ricardo Wurmus <address@hidden>
> Date: Sun, 17 Jan 2016 17:10:31 +0100
> Subject: [PATCH] gnu: Add Qtractor.
> 
> * gnu/packages/music.scm (qtractor): New variable.

I tried it on Debian. It gave a warning about the JACK server not
running. If that is expected then it looks good to me.

> ---
>  gnu/packages/music.scm | 40 +++++++++++++++++++++++++++++++++++++++-
>  1 file changed, 39 insertions(+), 1 deletion(-)
> 
> diff --git a/gnu/packages/music.scm b/gnu/packages/music.scm
> index a71a4c5..0accae2 100644
> --- a/gnu/packages/music.scm
> +++ b/gnu/packages/music.scm
> @@ -1,6 +1,6 @@
>  ;;; GNU Guix --- Functional package management for GNU
>  ;;; Copyright © 2014 Eric Bavier <address@hidden>
> -;;; Copyright © 2015 Ricardo Wurmus <address@hidden>
> +;;; Copyright © 2015, 2016 Ricardo Wurmus <address@hidden>
>  ;;; Copyright © 2015 Paul van der Walt <address@hidden>
>  ;;;
>  ;;; This file is part of GNU Guix.
> @@ -1041,3 +1041,41 @@ graphically in the terminal.  It is built on a 
> full-featured subtractive
>  synthesis engine.  Notes and parameter changes may be entered via MIDI or the
>  computer's keyboard.")
>      (license license:gpl3+)))
> +
> +(define-public qtractor
> +  (package
> +    (name "qtractor")
> +    (version "0.7.3")
> +    (source (origin
> +              (method url-fetch)
> +              (uri (string-append 
> "http://downloads.sourceforge.net/qtractor/";
> +                                  "qtractor-" version ".tar.gz"))
> +              (sha256
> +               (base32
> +                "1vy4297myyqk0k58nzybgvgklckhngpdcnmp98k0rq98dirclbl7"))))
> +    (build-system gnu-build-system)
> +    (arguments `(#:tests? #f)) ; no "check" target
> +    (inputs
> +     `(("qt" ,qt)
> +       ("alsa-lib" ,alsa-lib)
> +       ("jack" ,jack-1)
> +       ("libsndfile" ,libsndfile)
> +       ("ladspa" ,ladspa)
> +       ("lv2" ,lv2)
> +       ("lilv" ,lilv)
> +       ("suil" ,suil)
> +       ("libsamplerate" ,libsamplerate)
> +       ("libvorbis" ,libvorbis)
> +       ("libmad" ,libmad)
> +       ("rubberband" ,rubberband)
> +       ("liblo" ,liblo)
> +       ("zlib" ,zlib)))
> +    (native-inputs
> +     `(("pkg-config" ,pkg-config)))
> +    (home-page "http://qtractor.sourceforge.net/";)
> +    (synopsis "Audio/MIDI multi-track sequencer")
> +    (description
> +     "Qtractor is an Audio/MIDI multi-track sequencer application.  It uses
> +JACK for audio and ALSA sequencer for MIDI as multimedia infrastructures and
> +follows a traditional multi-track tape recorder control paradigm.")
> +    (license license:gpl2+)))
> -- 
> 2.6.3
> 
> 
>