mirror/guix
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2025-02-10 13:40:20 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: openttd-gfx: Use new package style.

Browse source 
* gnu/packages/games.scm (openttd-gfx)[arguments]: Convert to list of
G-Expressions.
[native-inputs]: Drop labels.
This commit is contained in:
Liliana Marie Prikler 2022-04-16 00:29:09 +02:00
parent a1acec2fe9
commit 2bae85d39b
No known key found for this signature in database
GPG key ID: 442A84B8C70E2F87
1 changed files with 24 additions and 21 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

45
gnu/packages/games.scm
View file

@ -4300,22 +4300,24 @@ engine. When you start it you will be prompted to download a graphics set.")
"0nhzlk6s73qvznm5fdwcs1b42g2plf26s5ag39fvck45zm7m48jk")))) "0nhzlk6s73qvznm5fdwcs1b42g2plf26s5ag39fvck45zm7m48jk"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:make-flags (list (string-append "CC=" ,(cc-for-target)) (list
(string-append "INSTALL_DIR=" #:make-flags
(assoc-ref %outputs "out") #~(list (string-append "CC=" #$(cc-for-target))
"/share/games/openttd/baseset/opengfx")) (string-append "INSTALL_DIR="
#:phases #$output
(modify-phases %standard-phases "/share/games/openttd/baseset/opengfx"))
(replace 'configure #:phases
(lambda _ #~(modify-phases %standard-phases
;; Make sure HOME is writable for GIMP. (replace 'configure
(setenv "HOME" (getcwd)) (lambda _
;; Make sure HOME is writable for GIMP.
(setenv "HOME" (getcwd))
;; Redirect stdout, not stderr, to /dev/null. This prevents ;; Redirect stdout, not stderr, to /dev/null. This prevents
;; dos2unix from receiving its version information as a flag. ;; dos2unix from receiving its version information as a flag.
(substitute* "Makefile" (substitute* "Makefile"
(("\\$\\(UNIX2DOS\\) -q --version 2>/dev/null") (("\\$\\(UNIX2DOS\\) -q --version 2>/dev/null")
"$(UNIX2DOS) -q --version 1>/dev/null"))))) "$(UNIX2DOS) -q --version 1>/dev/null")))))
;; The check phase for this package only checks the md5sums of the built ;; The check phase for this package only checks the md5sums of the built
;; GRF files against the md5sums of the release versions. Because we use ;; GRF files against the md5sums of the release versions. Because we use
;; different software versions than upstream does, some of the md5sums ;; different software versions than upstream does, some of the md5sums
@ -4323,12 +4325,13 @@ engine. When you start it you will be prompted to download a graphics set.")
;; to disable this test. ;; to disable this test.
#:tests? #f #:tests? #f
#:parallel-build? #f)) #:parallel-build? #f))
(native-inputs `(("dos2unix" ,dos2unix) (native-inputs
("gimp" ,gimp) (list dos2unix
("grfcodec" ,grfcodec) gimp
("nml" ,nml) grfcodec
("which" ,which) nml
("python" ,python))) which
python))
(home-page "http://dev.openttdcoop.org/projects/opengfx") (home-page "http://dev.openttdcoop.org/projects/opengfx")
(synopsis "Base graphics set for OpenTTD") (synopsis "Base graphics set for OpenTTD")
(description (description