aboutsummaryrefslogtreecommitdiff
path: root/gnu/packages/libusb.scm
diff options
context:
space:
mode:
authorRicardo Wurmus <rekado@elephly.net>2015-09-06 23:07:10 +0200
committerRicardo Wurmus <rekado@elephly.net>2015-09-09 07:03:26 +0200
commit3d3caf1f31782dee532b36ec7f677adf2608de38 (patch)
treea7f9e4170396d04298344900932f3b99f5d3d6f5 /gnu/packages/libusb.scm
parent5b86a5842c0f1d18eb0f6c78d0dfebf8fd8e8383 (diff)
downloadguix-3d3caf1f31782dee532b36ec7f677adf2608de38.tar
guix-3d3caf1f31782dee532b36ec7f677adf2608de38.tar.gz
gnu: Add gMTP.
* gnu/packages/libusb.scm (gmtp): New variable.
Diffstat (limited to 'gnu/packages/libusb.scm')
-rw-r--r--gnu/packages/libusb.scm41
1 files changed, 40 insertions, 1 deletions
diff --git a/gnu/packages/libusb.scm b/gnu/packages/libusb.scm
index 86a59befdd..e7f5b8b119 100644
--- a/gnu/packages/libusb.scm
+++ b/gnu/packages/libusb.scm
@@ -2,6 +2,7 @@
;;; Copyright © 2012 Nikita Karetnikov <nikita@karetnikov.org>
;;; Copyright © 2015 Andreas Enge <andreas@enge.fr>
;;; Copyright © 2015 Andy Wingo <wingo@igalia.com>
+;;; Copyright © 2015 Ricardo Wurmus <rekado@elephly.net>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -25,9 +26,13 @@
#:use-module (guix utils)
#:use-module (guix download)
#:use-module (guix build-system gnu)
+ #:use-module (guix build-system glib-or-gtk)
#:use-module (gnu packages gnupg)
+ #:use-module (gnu packages gtk)
#:use-module (gnu packages linux)
- #:use-module (gnu packages pkg-config))
+ #:use-module (gnu packages mp3)
+ #:use-module (gnu packages pkg-config)
+ #:use-module (gnu packages xiph))
(define-public libusb
(package
@@ -116,3 +121,37 @@ proposed for standardization.")
;; Foundation; either version 2 of the License, or (at your option) any
;; later version."
(license lgpl2.1+)))
+
+(define-public gmtp
+ (package
+ (name "gmtp")
+ (version "1.3.9")
+ (source (origin
+ (method url-fetch)
+ (uri (string-append "mirror://sourceforge/gmtp/" version
+ "/gmtp-" version ".tar.gz"))
+ (sha256
+ (base32
+ "0bdxvi0jf3q870a39xzsaj4qrjwc9b5bgvc95plc7xb6vf2m7zsv"))))
+ (build-system glib-or-gtk-build-system)
+ (arguments
+ '(#:configure-flags
+ (let ((libid3tag (assoc-ref %build-inputs "libid3tag")))
+ (list
+ ;; libid3tag provides no .pc file, so pkg-config fails to find them.
+ (string-append "ID3TAG_CFLAGS=-I" libid3tag "/include")
+ (string-append "ID3TAG_LIBS=-L" libid3tag "/lib -lid3tag -lz")))))
+ (inputs
+ `(("gtk+" ,gtk+)
+ ("flac" ,flac)
+ ("libvorbis" ,libvorbis)
+ ("libid3tag" ,libid3tag)
+ ("libmtp" ,libmtp)))
+ (native-inputs
+ `(("pkg-config" ,pkg-config)))
+ (home-page "http://gmtp.sourceforge.net/")
+ (synopsis "Simple graphical MTP client")
+ (description "gMTP is a simple graphical client for the Media Transfer Protocol
+ (MTP), which allows media files to be transferred to and from many portable
+devices.")
+ (license bsd-3)))