gnu: xonotic-data: Use G-expressions.
* gnu/packages/games.scm (xonotic-data)[arguments]: Rewrite as G-expressions.
This commit is contained in:
parent
501d4b3bb4
commit
33ae2fb398
1 changed files with 16 additions and 18 deletions
|
@ -7771,24 +7771,22 @@ quotation from a collection of quotes.")
|
||||||
(build-system trivial-build-system)
|
(build-system trivial-build-system)
|
||||||
(native-inputs (list unzip))
|
(native-inputs (list unzip))
|
||||||
(arguments
|
(arguments
|
||||||
`(#:modules ((guix build utils))
|
(list #:modules '((guix build utils))
|
||||||
#:builder
|
#:builder
|
||||||
(begin
|
#~(begin
|
||||||
(use-modules (guix build utils))
|
(use-modules (guix build utils))
|
||||||
(let* ((out (assoc-ref %outputs "out"))
|
(let* ((out (assoc-ref %outputs "out"))
|
||||||
(xonotic (string-append out "/share/xonotic"))
|
(xonotic (string-append out "/share/xonotic"))
|
||||||
(source (assoc-ref %build-inputs "source"))
|
(source (assoc-ref %build-inputs "source"))
|
||||||
(unzip (search-input-file %build-inputs "/bin/unzip")))
|
(unzip (search-input-file %build-inputs "/bin/unzip")))
|
||||||
(copy-file source (string-append ,name "-" ,version ".zip"))
|
(copy-file source (string-append #$name "-" #$version ".zip"))
|
||||||
(invoke unzip (string-append ,name "-" ,version ".zip"))
|
(invoke unzip (string-append #$name "-" #$version ".zip"))
|
||||||
(mkdir-p out)
|
(chdir "Xonotic")
|
||||||
(mkdir-p xonotic)
|
(install-file "key_0.d0pk" xonotic)
|
||||||
(chdir "Xonotic")
|
(copy-recursively "data"
|
||||||
(copy-recursively "data"
|
(string-append xonotic "/data"))
|
||||||
(string-append xonotic "/data"))
|
(copy-recursively "server"
|
||||||
(copy-recursively "server"
|
(string-append xonotic "/server"))))))
|
||||||
(string-append xonotic "/server"))
|
|
||||||
(install-file "key_0.d0pk" xonotic)))))
|
|
||||||
(home-page "http://xonotic.org")
|
(home-page "http://xonotic.org")
|
||||||
(synopsis "Data files for Xonotic")
|
(synopsis "Data files for Xonotic")
|
||||||
(description
|
(description
|
||||||
|
|
Reference in a new issue