me
/
guix
Archived
1
0
Fork 0
Code

gnu: higan: End phases with #t 

* gnu/packages/emulators.scm (higan)[arguments]: End all phases with #t.
master
Jakub Kądziołka 2020-02-15 22:43:56 +01:00
parent 038497db18
commit 6d34d3f80b
No known key found for this signature in database
GPG Key ID: E315A75846131564
1 changed files with 8 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
gnu/packages/emulators.scm
View File

@ -344,15 +344,18 @@ and a game metadata scraper.")
(delete 'configure) (delete 'configure)
(add-before 'build 'chdir-to-higan (add-before 'build 'chdir-to-higan
(lambda _ (lambda _
(chdir "higan"))) (chdir "higan")
#t))
(add-before 'install 'create-/share/applications (add-before 'install 'create-/share/applications
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let ((out (assoc-ref outputs "out"))) (let ((out (assoc-ref outputs "out")))
;; It seems the author forgot to do this in the Makefile. ;; It seems the author forgot to do this in the Makefile.
(mkdir-p (string-append out "/share/applications"))))) (mkdir-p (string-append out "/share/applications"))
#t)))
(add-after 'install 'chdir-to-icarus (add-after 'install 'chdir-to-icarus
(lambda _ (lambda _
(chdir "../icarus"))) (chdir "../icarus")
#t))
(add-after 'chdir-to-icarus 'build-icarus build-phase) (add-after 'chdir-to-icarus 'build-icarus build-phase)
(add-after 'build-icarus 'install-icarus install-phase) (add-after 'build-icarus 'install-icarus install-phase)
(add-after 'install-icarus 'wrap-higan-executable (add-after 'install-icarus 'wrap-higan-executable
@ -383,7 +386,8 @@ and a game metadata scraper.")
(chmod higan #o555) (chmod higan #o555)
;; Second, make sure higan will find icarus in PATH. ;; Second, make sure higan will find icarus in PATH.
(wrap-program higan (wrap-program higan
`("PATH" ":" prefix (,bin)))))))) `("PATH" ":" prefix (,bin)))
#t)))))
#:make-flags #:make-flags
(list "compiler=g++" (list "compiler=g++"
(string-append "prefix=" (assoc-ref %outputs "out"))) (string-append "prefix=" (assoc-ref %outputs "out")))