From 3a5e3b232815683580b4ffb3078f9f04459c006c Mon Sep 17 00:00:00 2001
From: Raghav Gururajan <raghavgururajan@disroot.org>
Date: Wed, 29 Apr 2020 07:09:59 -0400
Subject: [PATCH] gnu: Add audacious.
* gnu/packages/audio.scm (audacious): New variable.
---
gnu/packages/audio.scm | 42 ++++++++++++++++++++++++++++++++++++++++++
1 file changed, 42 insertions(+)
@@ -111,6 +111,7 @@
#:use-module (guix build-system cmake)
#:use-module (guix build-system glib-or-gtk)
#:use-module (guix build-system gnu)
+ #:use-module (guix build-system qt)
#:use-module (guix build-system meson)
#:use-module (guix build-system python)
#:use-module (guix build-system trivial)
@@ -123,6 +124,47 @@
#:use-module (srfi srfi-1)
#:use-module (srfi srfi-26))
+(define-public audacious
+ (package
+ (name "audacious")
+ (version "4.0.3")
+ (source
+ (origin
+ (method url-fetch)
+ (uri
+ (string-append "https://distfiles.audacious-media-player.org/"
+ name "-" version ".tar.bz2"))
+ (sha256
+ (base32 "1mkn3wiqmp0mfaxmmcx41mkaz6xi9bl7jkca5g32mwsp332pf0gk"))))
+ (build-system meson-build-system)
+ (arguments
+ `(#:tests? #f ; No target
+ #:configure-flags
+ (list
+ ;; Otherwise, the RUNPATH will lack the final path component.
+ (string-append "-Dc_link_args=-Wl,-rpath="
+ (assoc-ref %outputs "out")
+ "/lib/libaudcore"))))
+ (native-inputs
+ `(("gettext" ,gettext-minimal)
+ ("glib:bin" ,glib "bin")
+ ("pkg-config" ,pkg-config)))
+ (inputs
+ `(("glib" ,glib)
+ ("qtbase" ,qtbase)))
+ (synopsis "Lightweight and versatile audio player")
+ (description "Audacious is an audio player software with a focus on low
+resource use, high audio quality, and support for a wide range of audio
+formats.")
+ (home-page "https://audacious-media-player.org/")
+ (license
+ (list
+ license:bsd-2
+ ;; Icons
+ license:cc-by-sa4.0
+ ;; LibGuess
+ license:bsd-3))))
+
(define-public vo-amrwbenc
(package
(name "vo-amrwbenc")
--
2.26.2