nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

gnu: clyrics: Fetch sources from git. 

* gnu/packages/music.scm (clyrics)[source]: Fetch from git.
[native-inputs]: Remove.
[arguments]: Adjust builder.
This commit is contained in:
Ricardo Wurmus 2018-11-11 12:01:25 +01:00
parent 3a0592ae31
commit 234a1825b2
No known key found for this signature in database
GPG Key ID: 197A5888235FACAC
1 changed files with 7 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
gnu/packages/music.scm
View File

@ -4156,17 +4156,15 @@ at @code{musicbrainz.org}.")
(version "0.10") (version "0.10")
(source (source
(origin (origin
(method url-fetch) (method git-fetch)
(uri (string-append (uri (git-reference
"https://github.com/trizen/clyrics/archive/" (url "https://github.com/trizen/clyrics.git")
version ".tar.gz")) (commit version)))
(file-name (git-file-name name version))
(sha256 (sha256
(base32 (base32
"1l0cg26afnjv8cgk0jbiavbyvq55q1djyigzmi526rpcjjwq9jwn")) "1qvj4dyipkkdccx5hci4z0q23i54ldk6hh7x5m35a7f70rrj6fbk"))))
(file-name (string-append name "-" version ".tar.gz"))))
(build-system trivial-build-system) (build-system trivial-build-system)
(native-inputs `(("tar" ,tar)
("gzip" ,gzip)))
(inputs (inputs
`(("bash" ,bash) ;for the wrapped program `(("bash" ,bash) ;for the wrapped program
("perl" ,perl) ("perl" ,perl)
@ -4183,17 +4181,12 @@ at @code{musicbrainz.org}.")
(ice-9 match) (ice-9 match)
(srfi srfi-26)) (srfi srfi-26))
(let* ((source (assoc-ref %build-inputs "source")) (let* ((source (assoc-ref %build-inputs "source"))
(tar (assoc-ref %build-inputs "tar"))
(gzip (assoc-ref %build-inputs "gzip"))
(output (assoc-ref %outputs "out"))) (output (assoc-ref %outputs "out")))
(setenv "PATH" (setenv "PATH"
(string-append (string-append
(assoc-ref %build-inputs "gzip") "/bin" ":"
(assoc-ref %build-inputs "bash") "/bin" ":" (assoc-ref %build-inputs "bash") "/bin" ":"
(assoc-ref %build-inputs "perl") "/bin" ":")) (assoc-ref %build-inputs "perl") "/bin" ":"))
(invoke (string-append tar "/bin/tar") "xvf" (copy-recursively source (getcwd))
source)
(chdir ,(string-append "clyrics-" version))
(patch-shebang "clyrics") (patch-shebang "clyrics")
(substitute* "clyrics" (substitute* "clyrics"
(("/usr/share") output)) (("/usr/share") output))