guix: renpy-build-system: Quote data directory.

This prevents generated launchers and desktop files from inadvertently
crashing if the directory name contains a space.

* gnu/build/renpy-build-system.scm (install, install-desktop-file): Use ~s
to format data directory.
This commit is contained in:
Leo Prikler 2021-02-21 00:47:35 +01:00
parent 53c40b3c77
commit a1fd8f01b2
No known key found for this signature in database
GPG Key ID: 442A84B8C70E2F87
1 changed files with 4 additions and 3 deletions

View File

@ -57,7 +57,7 @@
(delete-file (string-append data "/renpy-build.json"))
(call-with-output-file launcher
(lambda (port)
(format port "#!~a~%~a ~a \"$@\""
(format port "#!~a~%~a ~s \"$@\""
(which "bash")
(which "renpy")
data)))
@ -77,8 +77,9 @@
(string-append out "/share/applications/" executable-name ".desktop")
#:name (assoc-ref json-dump "name")
#:generic-name (assoc-ref build "display_name")
#:exec (string-append (which "renpy") " "
out "/share/renpy/" directory-name)
#:exec (format #f "~a ~s"
(which "renpy")
(string-append out "/share/renpy/" directory-name))
#:categories '("Game" "Visual Novel")))
#t)