From mboxrd@z Thu Jan 1 00:00:00 1970 Received: from eggs.gnu.org ([2001:470:142:3::10]:49880) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1i4p7b-0004oi-UX for guix-patches@gnu.org; Mon, 02 Sep 2019 12:24:05 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1i4p7a-00089n-Or for guix-patches@gnu.org; Mon, 02 Sep 2019 12:24:03 -0400 Received: from debbugs.gnu.org ([209.51.188.43]:50081) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1i4p7a-00089M-8z for guix-patches@gnu.org; Mon, 02 Sep 2019 12:24:02 -0400 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1i4p7a-0001dS-33 for guix-patches@gnu.org; Mon, 02 Sep 2019 12:24:02 -0400 Subject: [bug#37284] [PATCH] added gnu/packages/fmit.scm (Free Musical Instrument Tuner) Resent-Message-ID: Received: from eggs.gnu.org ([2001:470:142:3::10]:49016) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1i4p0L-0002W5-Qk for guix-patches@gnu.org; Mon, 02 Sep 2019 12:16:35 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1i4p0K-0002ua-8W for guix-patches@gnu.org; Mon, 02 Sep 2019 12:16:33 -0400 Received: from mail-40133.protonmail.ch ([185.70.40.133]:58074) by eggs.gnu.org with esmtps (TLS1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.71) (envelope-from ) id 1i4p0J-0002qm-Mc for guix-patches@gnu.org; Mon, 02 Sep 2019 12:16:32 -0400 Date: Mon, 02 Sep 2019 16:16:19 +0000 Message-ID: MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: quoted-printable List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-patches-bounces+kyle=kyleam.com@gnu.org Sender: "Guix-patches" Reply-to: raingloom via Guix-patches From: raingloom via Guix-patches via To: 37284@debbugs.gnu.org * gnu/packages/fmit.scm: created --- gnu/packages/fmit.scm | 64 +++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 64 insertions(+) create mode 100644 gnu/packages/fmit.scm diff --git a/gnu/packages/fmit.scm b/gnu/packages/fmit.scm new file mode 100644 index 0000000000..2db5b1ca25 --- /dev/null +++ b/gnu/packages/fmit.scm @@ -0,0 +1,64 @@ +(define-module (gnu packages fmit) + #:use-module (guix packages) + #:use-module (guix git-download) + #:use-module (guix build-system gnu) + #:use-module (guix licenses) + #:use-module (gnu packages qt) + #:use-module (gnu packages gnome) + #:use-module (gnu packages algebra) + #:use-module (gnu packages audio) + #:use-module (gnu packages glib) + #:use-module (gnu packages linux) + #:use-module (gnu packages gettext)) + +(define-public fmit + (package + (name "fmit") + (version "1.2.6") + (source (origin +=09 (method git-fetch) +=09 (uri (git-reference +=09=09 (url "https://github.com/gillesdegottex/fmit/") +=09=09 (commit (string-append "v" version)))) +=09 (sha256 (base32 "03nzkig5mw2rqwhwmg0qvc5cnk9bwh2wp13jh0mdrr935w05= 87mz")))) + (build-system gnu-build-system) + (arguments + '(#:make-flags (let ((out (assoc-ref %outputs "out"))) (list (string-= append "PREFIX=3D" out) (string-append "PREFIXSHORTCUT=3D" out))) + #:phases + (modify-phases %standard-phases +=09 (delete 'configure) +=09 (add-before 'build 'qmake +=09 (lambda _ +=09 (let ((out (assoc-ref %outputs "out"))) (invoke "qmake" "fmit.pro"= (string-append "PREFIX=3D" out) (string-append "PREFIXSHORTCUT=3D" out) "C= ONFIG+=3Dacs_qt acs_alsa acs_jack acs_portaudio")))) + (add-after 'install 'wrap-executable + (lambda* (#:key inputs outputs #:allow-other-keys) + (let ((out (assoc-ref outputs "out"))) + (wrap-program (string-append out "/bin/fmit") + `("QT_PLUGIN_PATH" ":" prefix + ,(map (lambda (label) + (string-append (assoc-ref inputs label) + "/lib/qt5/plugins")) + '("qtbase" "qtmultimedia" "qtsvg"))) + `("QML2_IMPORT_PATH" ":" prefix + ,(map (lambda (label) + (string-append (assoc-ref inputs label) + "/lib/qt5/qml")) + '("qtmultimedia")))) + #t)))))) + (inputs + `(("fftw" ,fftw) + ("portaudio" ,portaudio) + ("qtmultimedia" ,qtmultimedia) + ("qtsvg" ,qtsvg) + ("alsa-lib" ,alsa-lib) + ("jack" ,jack-1) + ("qtbase" ,qtbase))) + (native-inputs + `(("itstool" ,itstool) + ("qttools" ,qttools) + ("hicolor-icon-theme" ,hicolor-icon-theme) + ("gettext" ,gnu-gettext))) + (synopsis "Free Musical Instrument Tuner") + (description "FMIT is a graphical utility for tuning musical instrumen= ts, with error and volume history, and advanced features") + (home-page "http://gillesdegottex.github.io/fmit/") + (license gpl3+))) -- 2.23.0