gnu: clementine: Indent.
* gnu/packages/music.scm (clementine): Remove 'version' variable and one level of indentation. Signed-off-by: Guillaume Le Vaillant <glv@posteo.net>
This commit is contained in:
Pierre Langlois
Guillaume Le Vaillant
parent
7b207e0849
commit
92f37c07e7
@ -338,111 +338,110 @@ score, keyboard, guitar, drum and controller views.")
|
|||||||
(license license:gpl3+)))
|
(license license:gpl3+)))
|
||||||
|
|
||||||
(define-public clementine
|
(define-public clementine
|
||||||
(let ((version "1.4.0rc1-450-g2725ef99d"))
|
(package
|
||||||
(package
|
(name "clementine")
|
||||||
(name "clementine")
|
(version "1.4.0rc1-450-g2725ef99d")
|
||||||
(version version)
|
(source (origin
|
||||||
(source (origin
|
(method git-fetch)
|
||||||
(method git-fetch)
|
(uri (git-reference
|
||||||
(uri (git-reference
|
(url "https://github.com/clementine-player/Clementine")
|
||||||
(url "https://github.com/clementine-player/Clementine")
|
(commit version)))
|
||||||
(commit version)))
|
(file-name (git-file-name name version))
|
||||||
(file-name (git-file-name name version))
|
(sha256
|
||||||
(sha256
|
(base32
|
||||||
(base32
|
"1pcwwi9b2qcfjn748577gqx6d1hgg7cisw2dn43npwafdvvkdb90"))
|
||||||
"1pcwwi9b2qcfjn748577gqx6d1hgg7cisw2dn43npwafdvvkdb90"))
|
(modules '((guix build utils)
|
||||||
(modules '((guix build utils)
|
(ice-9 regex)))
|
||||||
(ice-9 regex)))
|
(snippet
|
||||||
(snippet
|
'(begin
|
||||||
'(begin
|
(use-modules ((ice-9 regex)))
|
||||||
(use-modules ((ice-9 regex)))
|
(for-each
|
||||||
(for-each
|
(lambda (dir)
|
||||||
(lambda (dir)
|
;; TODO: The following dependencies are still bundled:
|
||||||
;; TODO: The following dependencies are still bundled:
|
;; - "qxt": Appears to be unmaintained upstream.
|
||||||
;; - "qxt": Appears to be unmaintained upstream.
|
;; - "qsqlite"
|
||||||
;; - "qsqlite"
|
;; - "qtsingleapplication"
|
||||||
;; - "qtsingleapplication"
|
;; - "qocoa"
|
||||||
;; - "qocoa"
|
;; - "qtiocompressor"
|
||||||
;; - "qtiocompressor"
|
(let ((bundled '("qsqlite"
|
||||||
(let ((bundled '("qsqlite"
|
"qtsingleapplication"
|
||||||
"qtsingleapplication"
|
"qxt"
|
||||||
"qxt"
|
"qocoa"
|
||||||
"qocoa"
|
"qtiocompressor")))
|
||||||
"qtiocompressor")))
|
(if (not
|
||||||
(if (not
|
(string-match
|
||||||
(string-match
|
(string-append ".?*(" (string-join bundled "|") ")")
|
||||||
(string-append ".?*(" (string-join bundled "|") ")")
|
dir))
|
||||||
dir))
|
(delete-file-recursively dir))))
|
||||||
(delete-file-recursively dir))))
|
(find-files "3rdparty"
|
||||||
(find-files "3rdparty"
|
(lambda (file stat)
|
||||||
(lambda (file stat)
|
(string-match "^3rdparty/[^/]*$" file))
|
||||||
(string-match "^3rdparty/[^/]*$" file))
|
#:directories? #t))
|
||||||
#:directories? #t))
|
#t))))
|
||||||
#t))))
|
(build-system cmake-build-system)
|
||||||
(build-system cmake-build-system)
|
(arguments
|
||||||
(arguments
|
'(#:test-target "clementine_test"
|
||||||
'(#:test-target "clementine_test"
|
#:configure-flags
|
||||||
#:configure-flags
|
(list ;; Requires unpackaged "projectm"
|
||||||
(list ;; Requires unpackaged "projectm"
|
"-DENABLE_VISUALISATIONS=OFF"
|
||||||
"-DENABLE_VISUALISATIONS=OFF"
|
;; Otherwise it may try to download a non-free library at run-time.
|
||||||
;; Otherwise it may try to download a non-free library at run-time.
|
;; TODO In an origin snippet, remove the code that performs the
|
||||||
;; TODO In an origin snippet, remove the code that performs the
|
;; download.
|
||||||
;; download.
|
"-DHAVE_SPOTIFY_DOWNLOADER=FALSE"
|
||||||
"-DHAVE_SPOTIFY_DOWNLOADER=FALSE"
|
;; Clementine checks that the taglib version is higher than 1.11,
|
||||||
;; Clementine checks that the taglib version is higher than 1.11,
|
;; because of https://github.com/taglib/taglib/issues/864. Remove
|
||||||
;; because of https://github.com/taglib/taglib/issues/864. Remove
|
;; this flag when 1.12 is released.
|
||||||
;; this flag when 1.12 is released.
|
"-DUSE_SYSTEM_TAGLIB=TRUE")
|
||||||
"-DUSE_SYSTEM_TAGLIB=TRUE")
|
#:phases
|
||||||
#:phases
|
(modify-phases %standard-phases
|
||||||
(modify-phases %standard-phases
|
(add-after 'install 'wrap-program
|
||||||
(add-after 'install 'wrap-program
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
||||||
(lambda* (#:key inputs outputs #:allow-other-keys)
|
(let ((out (assoc-ref outputs "out"))
|
||||||
(let ((out (assoc-ref outputs "out"))
|
(gst-plugin-path (getenv "GST_PLUGIN_SYSTEM_PATH")))
|
||||||
(gst-plugin-path (getenv "GST_PLUGIN_SYSTEM_PATH")))
|
(wrap-program (string-append out "/bin/clementine")
|
||||||
(wrap-program (string-append out "/bin/clementine")
|
`("GST_PLUGIN_SYSTEM_PATH" ":" prefix (,gst-plugin-path)))
|
||||||
`("GST_PLUGIN_SYSTEM_PATH" ":" prefix (,gst-plugin-path)))
|
#t))))))
|
||||||
#t))))))
|
(native-inputs
|
||||||
(native-inputs
|
`(("gettext" ,gettext-minimal)
|
||||||
`(("gettext" ,gettext-minimal)
|
("googletest" ,googletest)
|
||||||
("googletest" ,googletest)
|
("pkg-config" ,pkg-config)
|
||||||
("pkg-config" ,pkg-config)
|
("qtlinguist" ,qttools)))
|
||||||
("qtlinguist" ,qttools)))
|
(inputs
|
||||||
(inputs
|
`(("boost" ,boost)
|
||||||
`(("boost" ,boost)
|
("chromaprint" ,chromaprint)
|
||||||
("chromaprint" ,chromaprint)
|
("fftw" ,fftw)
|
||||||
("fftw" ,fftw)
|
("glib" ,glib)
|
||||||
("glib" ,glib)
|
("glu" ,glu)
|
||||||
("glu" ,glu)
|
("gstreamer" ,gstreamer)
|
||||||
("gstreamer" ,gstreamer)
|
("gst-plugins-base" ,gst-plugins-base)
|
||||||
("gst-plugins-base" ,gst-plugins-base)
|
("gst-plugins-good" ,gst-plugins-good)
|
||||||
("gst-plugins-good" ,gst-plugins-good)
|
("gst-libav" ,gst-libav)
|
||||||
("gst-libav" ,gst-libav)
|
("libcdio" ,libcdio)
|
||||||
("libcdio" ,libcdio)
|
("libmygpo-qt" ,libmygpo-qt)
|
||||||
("libmygpo-qt" ,libmygpo-qt)
|
;; TODO: Package libgpod.
|
||||||
;; TODO: Package libgpod.
|
("libmtp" ,libmtp)
|
||||||
("libmtp" ,libmtp)
|
("libxml2" ,libxml2)
|
||||||
("libxml2" ,libxml2)
|
("protobuf" ,protobuf)
|
||||||
("protobuf" ,protobuf)
|
("pulseaudio" ,pulseaudio)
|
||||||
("pulseaudio" ,pulseaudio)
|
("qtbase" ,qtbase)
|
||||||
("qtbase" ,qtbase)
|
("qtx11extras" ,qtx11extras)
|
||||||
("qtx11extras" ,qtx11extras)
|
("sqlite" ,sqlite)
|
||||||
("sqlite" ,sqlite)
|
("sparsehash" ,sparsehash)
|
||||||
("sparsehash" ,sparsehash)
|
("taglib" ,taglib)))
|
||||||
("taglib" ,taglib)))
|
(home-page "https://clementine-player.org")
|
||||||
(home-page "https://clementine-player.org")
|
(synopsis "Music player and library organizer")
|
||||||
(synopsis "Music player and library organizer")
|
(description "Clementine is a multiplatform music player. It is inspired
|
||||||
(description "Clementine is a multiplatform music player. It is inspired
|
|
||||||
by Amarok 1.4, focusing on a fast and easy-to-use interface for searching and
|
by Amarok 1.4, focusing on a fast and easy-to-use interface for searching and
|
||||||
playing your music.")
|
playing your music.")
|
||||||
(license (list
|
(license (list
|
||||||
;; clementine and qtiocompressor are under GPLv3.
|
;; clementine and qtiocompressor are under GPLv3.
|
||||||
license:gpl3+
|
license:gpl3+
|
||||||
;; qxt is under CPL1.0.
|
;; qxt is under CPL1.0.
|
||||||
license:cpl1.0
|
license:cpl1.0
|
||||||
;; qsqlite and qtsingleapplication are under LGPL2.1+.
|
;; qsqlite and qtsingleapplication are under LGPL2.1+.
|
||||||
license:lgpl2.1+
|
license:lgpl2.1+
|
||||||
;; qocoa is under MIT and CC by-sa for the icons.
|
;; qocoa is under MIT and CC by-sa for the icons.
|
||||||
license:cc-by-sa3.0)))))
|
license:cc-by-sa3.0))))
|
||||||
|
|
||||||
(define-public cmus
|
(define-public cmus
|
||||||
(package
|
(package
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user