From unknown Tue Aug 19 10:05:35 2025 X-Loop: help-debbugs@gnu.org Subject: [bug#31947] [PATCH] gnu: Add clyrics. Resent-From: Pierre Neidhardt Original-Sender: "Debbugs-submit" Resent-CC: guix-patches@gnu.org Resent-Date: Sat, 23 Jun 2018 11:17:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 31947 X-GNU-PR-Package: guix-patches X-GNU-PR-Keywords: patch To: 31947@debbugs.gnu.org X-Debbugs-Original-To: guix-patches@gnu.org Received: via spool by submit@debbugs.gnu.org id=B.152975260225850 (code B ref -1); Sat, 23 Jun 2018 11:17:01 +0000 Received: (at submit) by debbugs.gnu.org; 23 Jun 2018 11:16:42 +0000 Received: from localhost ([127.0.0.1]:60852 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1fWgWz-0006im-2r for submit@debbugs.gnu.org; Sat, 23 Jun 2018 07:16:42 -0400 Received: from eggs.gnu.org ([208.118.235.92]:56710) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1fWgWx-0006iY-Rt for submit@debbugs.gnu.org; Sat, 23 Jun 2018 07:16:36 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1fWgWr-00058N-JK for submit@debbugs.gnu.org; Sat, 23 Jun 2018 07:16:30 -0400 X-Spam-Checker-Version: SpamAssassin 3.3.2 (2011-06-06) on eggs.gnu.org X-Spam-Level: X-Spam-Status: No, score=0.8 required=5.0 tests=BAYES_50,FREEMAIL_FROM, T_DKIM_INVALID autolearn=disabled version=3.3.2 Received: from lists.gnu.org ([2001:4830:134:3::11]:58338) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_256_CBC_SHA1:32) (Exim 4.71) (envelope-from ) id 1fWgWr-00058I-G5 for submit@debbugs.gnu.org; Sat, 23 Jun 2018 07:16:29 -0400 Received: from eggs.gnu.org ([2001:4830:134:3::10]:47672) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1fWgWq-0007bd-3s for guix-patches@gnu.org; Sat, 23 Jun 2018 07:16:29 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1fWgWo-00057s-P6 for guix-patches@gnu.org; Sat, 23 Jun 2018 07:16:27 -0400 Received: from mail-wm0-x233.google.com ([2a00:1450:400c:c09::233]:36522) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1fWgWo-00057o-I5 for guix-patches@gnu.org; Sat, 23 Jun 2018 07:16:26 -0400 Received: by mail-wm0-x233.google.com with SMTP id u18-v6so713067wmc.1 for ; Sat, 23 Jun 2018 04:16:26 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20161025; h=from:to:subject:date:message-id:mime-version :content-transfer-encoding; bh=Wb+fZFBS9i/y5C92Og7NNaGThca4dGND+cELDGMGaIs=; b=RWJBz405WyG7dqNJMUR3zQV3RkyZBfnP+CPycZ6rHIS4S4uhMqGEyya2zy/wF6Y3pd lky0Fy/eq0TdLM7skuhEVoDdT2Md7/nG9ZAgvhhzLEN2Zvnra1gxjM92MQs4zdLsj5BV ME7KwgGTKxhoLzCG6eytovwVl3wSmQIqXQDv/GMYHeHVEyR7mRHsSWC7MhX+mh5jqEJ2 OiE2sXs0v0RF8qev7VFSoJ0r+oAEsUW4YSiu0MpA1YvQfvDECZgxmi88s43nbZi28oB8 L4W6TbY6BArT1ZEDRFxjtbUHbH8C2kMRDApHskSzc6z8gVOz+2+n5TffLCpOY/8xsjmC Tqrw== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20161025; h=x-gm-message-state:from:to:subject:date:message-id:mime-version :content-transfer-encoding; bh=Wb+fZFBS9i/y5C92Og7NNaGThca4dGND+cELDGMGaIs=; b=eF17KzTcofqpC6jRTeaidOrVcM9MsTR3WFpL204KdHOqPL12zWQtRAvEOPhQgCx8fl Tet+NUjIM8piszVPRUUZw9n7YcUXez0nuhB0jX4lJTevkBPCmsICaVhxn1g7rAB6rzDf cJVs8f7i/hL/OLovparVOH2DihiuM5ddl3U98/kGS8H9jjW8UWMW0pOqQEDTDLWiTusb snI1XPVb0IKf7CZK8t7b4KX/kggDN/r10Af6xCvlfNFYJEVAON9oimmca9h/xCsm4Pq2 6BVIXWshut5qGlcwHBH27bkwFKn2Z6a8UQWkNHVkJJmI7xVcJS2IrPGZnIAGgEq5vdyG X4pw== X-Gm-Message-State: APt69E24gBUlzdiFkibt4FdfvmgtJBaCB3CG/pQNrcambY4TdeiBmO3r mE1pRc8FqXGO5ky/+GhKid2/LA== X-Google-Smtp-Source: AAOMgpfcu1MC+R288vNzlBpHDCu/BzPwArtKLdcoS/7V/pLEJ3IbEE+TatLVwnThaOK6id9Uk6ppmA== X-Received: by 2002:a1c:8590:: with SMTP id h138-v6mr4148496wmd.85.1529752585239; Sat, 23 Jun 2018 04:16:25 -0700 (PDT) Received: from mimimi.home (2a01cb040a37a0005adf9a0845f647b3.ipv6.abo.wanadoo.fr. [2a01:cb04:a37:a000:5adf:9a08:45f6:47b3]) by smtp.gmail.com with ESMTPSA id c129-v6sm4055290wma.37.2018.06.23.04.16.24 for (version=TLS1_2 cipher=ECDHE-RSA-AES128-GCM-SHA256 bits=128/128); Sat, 23 Jun 2018 04:16:24 -0700 (PDT) From: Pierre Neidhardt Date: Sat, 23 Jun 2018 13:16:23 +0200 Message-Id: <20180623111623.4223-1-ambrevar@gmail.com> X-Mailer: git-send-email 2.17.1 MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit X-detected-operating-system: by eggs.gnu.org: Genre and OS details not recognized. X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6.x X-Received-From: 2001:4830:134:3::11 X-Spam-Score: -4.0 (----) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -5.0 (-----) * gnu/packages/music.scm (clyrics): New variable. --- gnu/packages/music.scm | 71 ++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 71 insertions(+) diff --git a/gnu/packages/music.scm b/gnu/packages/music.scm index daefbc57f..36e20c352 100644 --- a/gnu/packages/music.scm +++ b/gnu/packages/music.scm @@ -16,6 +16,7 @@ ;;; Copyright © 2017, 2018 Tobias Geerinckx-Rice ;;; Copyright © 2018 nee ;;; Copyright © 2018 Stefan Reichör +;;; Copyright © 2018 Pierre Neidhardt ;;; ;;; This file is part of GNU Guix. ;;; @@ -45,6 +46,7 @@ #:use-module (guix build-system scons) #:use-module (guix build-system glib-or-gtk) #:use-module (guix build-system waf) + #:use-module (guix build-system trivial) #:use-module (gnu packages) #:use-module (gnu packages algebra) #:use-module (gnu packages apr) @@ -4004,3 +4006,72 @@ ISRCs and the MCN (=UPC/EAN) from disc.") mb_client, is a development library geared towards developers who wish to add MusicBrainz lookup capabilities to their applications.") (license license:lgpl2.1+))) + +(define-public clyrics + (package + (name "clyrics") + (version "0.10") + (source + (origin + (method url-fetch) + (uri (string-append + "https://github.com/trizen/clyrics/archive/" + version ".tar.gz")) + (sha256 + (base32 + "1l0cg26afnjv8cgk0jbiavbyvq55q1djyigzmi526rpcjjwq9jwn")))) + (build-system trivial-build-system) + (native-inputs `(("tar" ,tar) + ("gzip" ,gzip))) + (inputs + `(("bash" ,bash) ; For the wrapped-program. + ("perl" ,perl) + ("perl-www-mechanize" ,perl-www-mechanize) + ("perl-lwp-protocol-https" ,perl-lwp-protocol-https) + ;; Required or else LWP will fail with "GET https://www.google.com/ ==> + ;; 500 Can't verify SSL peers without knowing which Certificate + ;; Authorities to trust". + ("perl-mozilla-ca" ,perl-mozilla-ca))) + (arguments + `(#:modules ((guix build utils)) + #:builder (begin + (use-modules (guix build utils) + (ice-9 match) + (srfi srfi-26)) + (let* ((source (assoc-ref %build-inputs "source")) + (tar (assoc-ref %build-inputs "tar")) + (gzip (assoc-ref %build-inputs "gzip")) + (output (assoc-ref %outputs "out"))) + (setenv "PATH" + (string-append + (assoc-ref %build-inputs "gzip") "/bin" ":" + (assoc-ref %build-inputs "bash") "/bin" ":" + (assoc-ref %build-inputs "perl") "/bin" ":")) + (invoke (string-append tar "/bin/tar") "xvf" + source) + (chdir ,(string-append "clyrics-" version)) + (patch-shebang "clyrics") + (substitute* "clyrics" + (("/usr/share") output)) + (install-file "clyrics" (string-append output "/bin")) + (wrap-program (string-append output "/bin/clyrics") + `("PERL5LIB" ":" = + ,(delete + "" + (map (match-lambda + (((? (cut string-prefix? "perl-" <>) name) . dir) + (string-append dir "/lib/perl5/site_perl")) + (_ "")) + %build-inputs)))) + (copy-recursively "plugins" (string-append output "/clyrics")) + #t)))) + (home-page "https://github.com/trizen/clyrics") + (synopsis "Extensible lyrics fetcher, with daemon support for cmus and mocp") + (description "An extensible lyrics fetcher, with daemon support for cmus and mocp. +Features: + +@itemize +@item support for plugins +@item cmus and mocp daemon mode +@end itemize\n") + (license license:gpl3+))) -- 2.17.1 From unknown Tue Aug 19 10:05:35 2025 MIME-Version: 1.0 X-Mailer: MIME-tools 5.505 (Entity 5.505) X-Loop: help-debbugs@gnu.org From: help-debbugs@gnu.org (GNU bug Tracking System) To: Pierre Neidhardt Subject: bug#31947: closed (Re: [bug#31947] [PATCH] gnu: Add clyrics.) Message-ID: References: <876026r3id.fsf@gnu.org> <20180623111623.4223-1-ambrevar@gmail.com> X-Gnu-PR-Message: they-closed 31947 X-Gnu-PR-Package: guix-patches X-Gnu-PR-Keywords: patch Reply-To: 31947@debbugs.gnu.org Date: Mon, 25 Jun 2018 20:55:03 +0000 Content-Type: multipart/mixed; boundary="----------=_1529960103-28209-1" This is a multi-part message in MIME format... ------------=_1529960103-28209-1 Content-Disposition: inline Content-Transfer-Encoding: quoted-printable Content-Type: text/plain; charset="utf-8" Your bug report #31947: [PATCH] gnu: Add clyrics. which was filed against the guix-patches package, has been closed. The explanation is attached below, along with your original report. If you require more details, please reply to 31947@debbugs.gnu.org. --=20 31947: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=3D31947 GNU Bug Tracking System Contact help-debbugs@gnu.org with problems ------------=_1529960103-28209-1 Content-Type: message/rfc822 Content-Disposition: inline Content-Transfer-Encoding: 7bit Received: (at 31947-done) by debbugs.gnu.org; 25 Jun 2018 20:54:30 +0000 Received: from localhost ([127.0.0.1]:35335 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1fXYVK-0007Ju-DU for submit@debbugs.gnu.org; Mon, 25 Jun 2018 16:54:30 -0400 Received: from eggs.gnu.org ([208.118.235.92]:48145) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1fXYVI-0007Je-Vr for 31947-done@debbugs.gnu.org; Mon, 25 Jun 2018 16:54:29 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1fXYVA-00084I-WF for 31947-done@debbugs.gnu.org; Mon, 25 Jun 2018 16:54:23 -0400 X-Spam-Checker-Version: SpamAssassin 3.3.2 (2011-06-06) on eggs.gnu.org X-Spam-Level: X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00 autolearn=disabled version=3.3.2 Received: from fencepost.gnu.org ([2001:4830:134:3::e]:46457) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1fXYVA-00084E-S9; Mon, 25 Jun 2018 16:54:20 -0400 Received: from [2a01:e0a:1d:7270:af76:b9b:ca24:c465] (port=56542 helo=ribbon) by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256) (Exim 4.82) (envelope-from ) id 1fXYVA-0006Py-Ef; Mon, 25 Jun 2018 16:54:20 -0400 From: ludo@gnu.org (Ludovic =?utf-8?Q?Court=C3=A8s?=) To: Pierre Neidhardt Subject: Re: [bug#31947] [PATCH] gnu: Add clyrics. References: <20180623111623.4223-1-ambrevar@gmail.com> Date: Mon, 25 Jun 2018 22:54:18 +0200 In-Reply-To: <20180623111623.4223-1-ambrevar@gmail.com> (Pierre Neidhardt's message of "Sat, 23 Jun 2018 13:16:23 +0200") Message-ID: <876026r3id.fsf@gnu.org> User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/26.1 (gnu/linux) MIME-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Received-From: 2001:4830:134:3::e X-Spam-Score: -5.0 (-----) X-Debbugs-Envelope-To: 31947-done Cc: 31947-done@debbugs.gnu.org X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -6.0 (------) --=-=-= Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable Pierre Neidhardt skribis: > * gnu/packages/music.scm (clyrics): New variable. Applied with the following tweaks. Thanks! Ludo=E2=80=99. --=-=-= Content-Type: text/x-patch Content-Disposition: inline diff --git a/gnu/packages/music.scm b/gnu/packages/music.scm index 2a1ecd25a..824b03dc0 100644 --- a/gnu/packages/music.scm +++ b/gnu/packages/music.scm @@ -4031,12 +4031,13 @@ MusicBrainz lookup capabilities to their applications.") version ".tar.gz")) (sha256 (base32 - "1l0cg26afnjv8cgk0jbiavbyvq55q1djyigzmi526rpcjjwq9jwn")))) + "1l0cg26afnjv8cgk0jbiavbyvq55q1djyigzmi526rpcjjwq9jwn")) + (file-name (string-append name "-" version ".tar.gz")))) (build-system trivial-build-system) (native-inputs `(("tar" ,tar) ("gzip" ,gzip))) (inputs - `(("bash" ,bash) ; For the wrapped-program. + `(("bash" ,bash) ;for the wrapped program ("perl" ,perl) ("perl-www-mechanize" ,perl-www-mechanize) ("perl-lwp-protocol-https" ,perl-lwp-protocol-https) @@ -4078,12 +4079,9 @@ MusicBrainz lookup capabilities to their applications.") (copy-recursively "plugins" (string-append output "/clyrics")) #t)))) (home-page "https://github.com/trizen/clyrics") - (synopsis "Extensible lyrics fetcher, with daemon support for cmus and mocp") - (description "An extensible lyrics fetcher, with daemon support for cmus and mocp. -Features: - -@itemize -@item support for plugins -@item cmus and mocp daemon mode -@end itemize\n") + (synopsis "Extensible lyrics fetcher") + (description + "Clyrics is an extensible command-line tool to fetch the lyrics of songs. +It can be used in daemon mode along with the Music-on-Console (MOC) and cmus +console music players.") (license license:gpl3+))) --=-=-=-- ------------=_1529960103-28209-1 Content-Type: message/rfc822 Content-Disposition: inline Content-Transfer-Encoding: 7bit Received: (at submit) by debbugs.gnu.org; 23 Jun 2018 11:16:42 +0000 Received: from localhost ([127.0.0.1]:60852 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1fWgWz-0006im-2r for submit@debbugs.gnu.org; Sat, 23 Jun 2018 07:16:42 -0400 Received: from eggs.gnu.org ([208.118.235.92]:56710) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1fWgWx-0006iY-Rt for submit@debbugs.gnu.org; Sat, 23 Jun 2018 07:16:36 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1fWgWr-00058N-JK for submit@debbugs.gnu.org; Sat, 23 Jun 2018 07:16:30 -0400 X-Spam-Checker-Version: SpamAssassin 3.3.2 (2011-06-06) on eggs.gnu.org X-Spam-Level: X-Spam-Status: No, score=0.8 required=5.0 tests=BAYES_50,FREEMAIL_FROM, T_DKIM_INVALID autolearn=disabled version=3.3.2 Received: from lists.gnu.org ([2001:4830:134:3::11]:58338) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_256_CBC_SHA1:32) (Exim 4.71) (envelope-from ) id 1fWgWr-00058I-G5 for submit@debbugs.gnu.org; Sat, 23 Jun 2018 07:16:29 -0400 Received: from eggs.gnu.org ([2001:4830:134:3::10]:47672) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1fWgWq-0007bd-3s for guix-patches@gnu.org; Sat, 23 Jun 2018 07:16:29 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1fWgWo-00057s-P6 for guix-patches@gnu.org; Sat, 23 Jun 2018 07:16:27 -0400 Received: from mail-wm0-x233.google.com ([2a00:1450:400c:c09::233]:36522) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1fWgWo-00057o-I5 for guix-patches@gnu.org; Sat, 23 Jun 2018 07:16:26 -0400 Received: by mail-wm0-x233.google.com with SMTP id u18-v6so713067wmc.1 for ; Sat, 23 Jun 2018 04:16:26 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20161025; h=from:to:subject:date:message-id:mime-version :content-transfer-encoding; bh=Wb+fZFBS9i/y5C92Og7NNaGThca4dGND+cELDGMGaIs=; b=RWJBz405WyG7dqNJMUR3zQV3RkyZBfnP+CPycZ6rHIS4S4uhMqGEyya2zy/wF6Y3pd lky0Fy/eq0TdLM7skuhEVoDdT2Md7/nG9ZAgvhhzLEN2Zvnra1gxjM92MQs4zdLsj5BV ME7KwgGTKxhoLzCG6eytovwVl3wSmQIqXQDv/GMYHeHVEyR7mRHsSWC7MhX+mh5jqEJ2 OiE2sXs0v0RF8qev7VFSoJ0r+oAEsUW4YSiu0MpA1YvQfvDECZgxmi88s43nbZi28oB8 L4W6TbY6BArT1ZEDRFxjtbUHbH8C2kMRDApHskSzc6z8gVOz+2+n5TffLCpOY/8xsjmC Tqrw== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20161025; h=x-gm-message-state:from:to:subject:date:message-id:mime-version :content-transfer-encoding; bh=Wb+fZFBS9i/y5C92Og7NNaGThca4dGND+cELDGMGaIs=; b=eF17KzTcofqpC6jRTeaidOrVcM9MsTR3WFpL204KdHOqPL12zWQtRAvEOPhQgCx8fl Tet+NUjIM8piszVPRUUZw9n7YcUXez0nuhB0jX4lJTevkBPCmsICaVhxn1g7rAB6rzDf cJVs8f7i/hL/OLovparVOH2DihiuM5ddl3U98/kGS8H9jjW8UWMW0pOqQEDTDLWiTusb snI1XPVb0IKf7CZK8t7b4KX/kggDN/r10Af6xCvlfNFYJEVAON9oimmca9h/xCsm4Pq2 6BVIXWshut5qGlcwHBH27bkwFKn2Z6a8UQWkNHVkJJmI7xVcJS2IrPGZnIAGgEq5vdyG X4pw== X-Gm-Message-State: APt69E24gBUlzdiFkibt4FdfvmgtJBaCB3CG/pQNrcambY4TdeiBmO3r mE1pRc8FqXGO5ky/+GhKid2/LA== X-Google-Smtp-Source: AAOMgpfcu1MC+R288vNzlBpHDCu/BzPwArtKLdcoS/7V/pLEJ3IbEE+TatLVwnThaOK6id9Uk6ppmA== X-Received: by 2002:a1c:8590:: with SMTP id h138-v6mr4148496wmd.85.1529752585239; Sat, 23 Jun 2018 04:16:25 -0700 (PDT) Received: from mimimi.home (2a01cb040a37a0005adf9a0845f647b3.ipv6.abo.wanadoo.fr. [2a01:cb04:a37:a000:5adf:9a08:45f6:47b3]) by smtp.gmail.com with ESMTPSA id c129-v6sm4055290wma.37.2018.06.23.04.16.24 for (version=TLS1_2 cipher=ECDHE-RSA-AES128-GCM-SHA256 bits=128/128); Sat, 23 Jun 2018 04:16:24 -0700 (PDT) From: Pierre Neidhardt To: guix-patches@gnu.org Subject: [PATCH] gnu: Add clyrics. Date: Sat, 23 Jun 2018 13:16:23 +0200 Message-Id: <20180623111623.4223-1-ambrevar@gmail.com> X-Mailer: git-send-email 2.17.1 MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit X-detected-operating-system: by eggs.gnu.org: Genre and OS details not recognized. X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6.x X-Received-From: 2001:4830:134:3::11 X-Spam-Score: -4.0 (----) X-Debbugs-Envelope-To: submit X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -5.0 (-----) * gnu/packages/music.scm (clyrics): New variable. --- gnu/packages/music.scm | 71 ++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 71 insertions(+) diff --git a/gnu/packages/music.scm b/gnu/packages/music.scm index daefbc57f..36e20c352 100644 --- a/gnu/packages/music.scm +++ b/gnu/packages/music.scm @@ -16,6 +16,7 @@ ;;; Copyright © 2017, 2018 Tobias Geerinckx-Rice ;;; Copyright © 2018 nee ;;; Copyright © 2018 Stefan Reichör +;;; Copyright © 2018 Pierre Neidhardt ;;; ;;; This file is part of GNU Guix. ;;; @@ -45,6 +46,7 @@ #:use-module (guix build-system scons) #:use-module (guix build-system glib-or-gtk) #:use-module (guix build-system waf) + #:use-module (guix build-system trivial) #:use-module (gnu packages) #:use-module (gnu packages algebra) #:use-module (gnu packages apr) @@ -4004,3 +4006,72 @@ ISRCs and the MCN (=UPC/EAN) from disc.") mb_client, is a development library geared towards developers who wish to add MusicBrainz lookup capabilities to their applications.") (license license:lgpl2.1+))) + +(define-public clyrics + (package + (name "clyrics") + (version "0.10") + (source + (origin + (method url-fetch) + (uri (string-append + "https://github.com/trizen/clyrics/archive/" + version ".tar.gz")) + (sha256 + (base32 + "1l0cg26afnjv8cgk0jbiavbyvq55q1djyigzmi526rpcjjwq9jwn")))) + (build-system trivial-build-system) + (native-inputs `(("tar" ,tar) + ("gzip" ,gzip))) + (inputs + `(("bash" ,bash) ; For the wrapped-program. + ("perl" ,perl) + ("perl-www-mechanize" ,perl-www-mechanize) + ("perl-lwp-protocol-https" ,perl-lwp-protocol-https) + ;; Required or else LWP will fail with "GET https://www.google.com/ ==> + ;; 500 Can't verify SSL peers without knowing which Certificate + ;; Authorities to trust". + ("perl-mozilla-ca" ,perl-mozilla-ca))) + (arguments + `(#:modules ((guix build utils)) + #:builder (begin + (use-modules (guix build utils) + (ice-9 match) + (srfi srfi-26)) + (let* ((source (assoc-ref %build-inputs "source")) + (tar (assoc-ref %build-inputs "tar")) + (gzip (assoc-ref %build-inputs "gzip")) + (output (assoc-ref %outputs "out"))) + (setenv "PATH" + (string-append + (assoc-ref %build-inputs "gzip") "/bin" ":" + (assoc-ref %build-inputs "bash") "/bin" ":" + (assoc-ref %build-inputs "perl") "/bin" ":")) + (invoke (string-append tar "/bin/tar") "xvf" + source) + (chdir ,(string-append "clyrics-" version)) + (patch-shebang "clyrics") + (substitute* "clyrics" + (("/usr/share") output)) + (install-file "clyrics" (string-append output "/bin")) + (wrap-program (string-append output "/bin/clyrics") + `("PERL5LIB" ":" = + ,(delete + "" + (map (match-lambda + (((? (cut string-prefix? "perl-" <>) name) . dir) + (string-append dir "/lib/perl5/site_perl")) + (_ "")) + %build-inputs)))) + (copy-recursively "plugins" (string-append output "/clyrics")) + #t)))) + (home-page "https://github.com/trizen/clyrics") + (synopsis "Extensible lyrics fetcher, with daemon support for cmus and mocp") + (description "An extensible lyrics fetcher, with daemon support for cmus and mocp. +Features: + +@itemize +@item support for plugins +@item cmus and mocp daemon mode +@end itemize\n") + (license license:gpl3+))) -- 2.17.1 ------------=_1529960103-28209-1--