mirror of
https://git.savannah.gnu.org/git/guix.git
synced 2025-02-08 03:59:40 +01:00
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:
parent
53c40b3c77
commit
a1fd8f01b2
1 changed files with 4 additions and 3 deletions
|
@ -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)
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue