From mboxrd@z Thu Jan 1 00:00:00 1970 From: Ricardo Wurmus Subject: [PATCH] Add Qsynth. Date: Sat, 13 Jun 2015 19:54:54 +0200 Message-ID: <87616rjxxt.fsf@elephly.net> Mime-Version: 1.0 Content-Type: text/x-patch Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:43695) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Z3peA-0005Mu-U3 for guix-devel@gnu.org; Sat, 13 Jun 2015 13:55:12 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1Z3pe6-0002vq-Hz for guix-devel@gnu.org; Sat, 13 Jun 2015 13:55:10 -0400 Received: from sender163-mail.zoho.com ([74.201.84.163]:25021) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Z3pe6-0002rE-9S for guix-devel@gnu.org; Sat, 13 Jun 2015 13:55:06 -0400 Content-Disposition: inline; filename=0001-gnu-Add-Qsynth.patch List-Id: "Development of GNU Guix and the GNU System distribution." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org Sender: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org To: guix-devel >From 612b8503d5b473f8a7416b0b9c9287102fa72bb8 Mon Sep 17 00:00:00 2001 From: Ricardo Wurmus Date: Sat, 13 Jun 2015 19:53:48 +0200 Subject: [PATCH] gnu: Add Qsynth. * gnu/packages/audio.scm (qsynth): New variable. --- gnu/packages/audio.scm | 23 +++++++++++++++++++++++ 1 file changed, 23 insertions(+) diff --git a/gnu/packages/audio.scm b/gnu/packages/audio.scm index 3b2d4e1..bb844bb 100644 --- a/gnu/packages/audio.scm +++ b/gnu/packages/audio.scm @@ -1488,6 +1488,29 @@ to record and/or play sound using a callback function or a blocking read/write interface.") (license license:expat))) +(define-public qsynth + (package + (name "qsynth") + (version "0.3.9") + (source + (origin + (method url-fetch) + (uri (string-append + "mirror://sourceforge/qsynth/qsynth-" version ".tar.gz")) + (sha256 + (base32 "08kyn6cl755l9i1grzjx8yi3f8mgiz4gx0hgqad1n0d8yz85087b")))) + (build-system gnu-build-system) + (arguments + `(#:tests? #f)) ; no "check" phase + (inputs + `(("qt" ,qt) + ("fluidsynth" ,fluidsynth))) + (home-page "http://qsynth.sourceforge.net") + (synopsis "Graphical user interface for FluidSynth") + (description + "Qsynth is a GUI front-end application for FluidSynth written in C++.") + (license license:gpl2+))) + (define-public rsound (package (name "rsound") -- 2.2.1