mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-11-07 15:36:20 -05:00
gnu: stepmania: Fix all instances of accessing application data.
This is a follow-up to commit 45aba232ab
.
* gnu/packages/games.scm (stepmania)[arguments]: Rename phase
ensure-gtk-module-can-be-found to ensure-application-files-can-be-found and
fix remaining instances of application data access.
This commit is contained in:
parent
47131ebbc9
commit
4774677228
1 changed files with 14 additions and 5 deletions
|
@ -6182,12 +6182,21 @@ (define-public stepmania
|
|||
"/lib/glib-2.0/include"))
|
||||
#:phases
|
||||
(modify-phases %standard-phases
|
||||
(add-after 'unpack 'ensure-gtk-module-can-be-found
|
||||
(add-after 'unpack 'ensure-application-files-can-be-found
|
||||
(lambda* (#:key outputs #:allow-other-keys)
|
||||
(substitute* "src/arch/LoadingWindow/LoadingWindow_Gtk.cpp"
|
||||
(("RageFileManagerUtil::sDirOfExecutable \\+ \"/\" \\+ \"GtkModule.so\"")
|
||||
(string-append "\"" (assoc-ref outputs "out")
|
||||
"/share/stepmania/GtkModule.so\"")))
|
||||
(let ((out (assoc-ref outputs "out")))
|
||||
(substitute* "src/arch/LoadingWindow/LoadingWindow_Gtk.cpp"
|
||||
(("RageFileManagerUtil::sDirOfExecutable \\+ \"/\" \\+ \"GtkModule.so\"")
|
||||
(string-append "\"" out
|
||||
"/share/stepmania/GtkModule.so\"")))
|
||||
(substitute* "src/arch/ArchHooks/ArchHooks_Unix.cpp"
|
||||
(("Root = sDirOfExecutable")
|
||||
(string-append "Root = \"" out "/share/stepmania/\""))
|
||||
(("sDirOfExecutable \\+ \"/(Packages|Songs)\"" _ dir)
|
||||
(string-append "\"" out "/share/stepmania/" dir "\"")))
|
||||
(substitute* "src/RageFileManager.cpp"
|
||||
(("RageFileManagerUtil::sDirOfExecutable \\+ \"/\"")
|
||||
(string-append "\"" out "/share/stepmania/\""))))
|
||||
#t))
|
||||
(add-after 'unpack 'fix-install-subdir
|
||||
;; Installation would be done in "%out/stepmania-X.Y", but we
|
||||
|
|
Loading…
Reference in a new issue