me
/
guix
Archived
1
0
Fork 0

gnu: openttd: Add 'install-data' phase.

* gnu/packages/games.scm (openttd)[arguments]: Add it.
[native-inputs]: Add openttd-opengfx.
master
Kei Kebreau 2017-06-18 13:45:19 -04:00
parent 4df9495e68
commit ca508f1cfb
No known key found for this signature in database
GPG Key ID: E6A5EE3C19467A0D
1 changed files with 19 additions and 1 deletions

View File

@ -2359,7 +2359,25 @@ OpenGFX provides you with...
(define-public openttd (define-public openttd
(package (package
(inherit openttd-engine) (inherit openttd-engine)
(name "openttd"))) (name "openttd")
(arguments
(substitute-keyword-arguments (package-arguments openttd-engine)
((#:phases phases)
`(modify-phases ,phases
(add-after 'install 'install-data
(lambda* (#:key inputs outputs #:allow-other-keys)
(let*
((opengfx (assoc-ref inputs "opengfx"))
(out (assoc-ref outputs "out"))
(gfx-dir
(string-append out
"/share/games/openttd/baseset/opengfx")))
(mkdir-p gfx-dir)
(copy-recursively opengfx gfx-dir))
#t))))))
(native-inputs
`(("opengfx" ,openttd-opengfx)
,@(package-native-inputs openttd-engine)))))
(define-public pinball (define-public pinball
(package (package