me
/
guix
Archived
1
0
Fork 0
Code

gnu: opensurge: Update to 0.6.0.3. 

* gnu/packages/games.scm (opensurge): Update to 0.6.0.3.
[arguments]: Use G-exps.

Signed-off-by: Christopher Baines <mail@cbaines.net>
master
Timotej Lazar 2022-11-05 13:19:01 +01:00 committed by Christopher Baines
parent 3d1f64d747
commit 6e5e5f8fc2
No known key found for this signature in database
GPG Key ID: 5E28A33B0B84F577
1 changed files with 30 additions and 33 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

63
gnu/packages/games.scm
View File

@ -1662,7 +1662,7 @@ shadow mimic them to reach blocks you couldn't reach alone.")
(define-public opensurge (define-public opensurge
(package (package
(name "opensurge") (name "opensurge")
(version "0.5.2.1") (version "0.6.0.3")
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
@ -1671,40 +1671,37 @@ shadow mimic them to reach blocks you couldn't reach alone.")
(commit (string-append "v" version)))) (commit (string-append "v" version))))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 "13g5izss7dmgigc8iif8hid3z6i066b0z29rbql2b9qjmdj1dp41")))) (base32 "0yia2qcva741a64qpls8a59lvnx5vynqkk2i3arkflw6f1m1vb55"))))
(build-system cmake-build-system) (build-system cmake-build-system)
(arguments (arguments
`(#:tests? #f ;there are no tests (list #:tests? #f ; there are no tests
#:configure-flags #:configure-flags
(let* ((out (assoc-ref %outputs "out")) #~(list (string-append "-DCMAKE_INSTALL_PREFIX=" #$output)
(share (string-append out "/share"))) (string-append "-DGAME_BINDIR=" #$output "/bin") ; not games
(list (string-append "-DCMAKE_INSTALL_PREFIX=" out) (string-append "-DGAME_DATADIR=" #$output "/share/" #$name)
(string-append "-DGAME_BINDIR=" out "/bin") ; not /bin/games (string-append "-DDESKTOP_ENTRY_PATH=" #$output "/share/applications")
(string-append "-DGAME_DATADIR=" share "/" ,name) (string-append "-DDESKTOP_ICON_PATH=" #$output "/share/pixmaps")
(string-append "-DDESKTOP_ENTRY_PATH=" share "/applications") (string-append "-DDESKTOP_METAINFO_PATH=" #$output "/share/metainfo"))
(string-append "-DDESKTOP_ICON_PATH=" share "/pixmaps") #:phases
(string-append "-DDESKTOP_METAINFO_PATH=" share "/metainfo"))) #~(modify-phases %standard-phases
#:phases (add-after 'unpack 'fix-xdg-open-path
(modify-phases %standard-phases (lambda* (#:key inputs #:allow-other-keys)
(add-after 'unpack 'fix-xdg-open-path ;; Look for xdg-open in the store.
(lambda* (#:key inputs #:allow-other-keys) (substitute* "src/core/web.c"
;; Look for xdg-open in the store. (("/usr/(bin/xdg-open)" _ bin)
(substitute* "src/core/web.c" (search-input-file inputs bin)))))
(("/usr(/bin/xdg-open)" _ bin) (add-after 'unpack 'unbundle-fonts
(search-input-file inputs bin))))) (lambda* (#:key inputs #:allow-other-keys)
(add-after 'unpack 'unbundle-fonts ;; Replace bundled fonts with links to the store.
(lambda* (#:key inputs #:allow-other-keys) (with-directory-excursion "fonts"
;; Replace bundled Roboto fonts with links to the store. (for-each (lambda (font)
(with-directory-excursion "fonts" (let ((file (string-append "share/fonts/truetype/"
(let ((roboto-dir (string-append font)))
(assoc-ref inputs "font-google-roboto") (delete-file font)
"/share/fonts/truetype/"))) (symlink (search-input-file inputs file) font)))
(for-each '("Roboto-Black.ttf"
(lambda (font) "Roboto-Bold.ttf"
(delete-file font) "Roboto-Medium.ttf"))))))))
(symlink (string-append roboto-dir font) font))
'("Roboto-Black.ttf" "Roboto-Bold.ttf" "Roboto-Medium.ttf")))
#t))))))
(inputs (inputs
(list allegro font-google-roboto surgescript xdg-utils)) (list allegro font-google-roboto surgescript xdg-utils))
(home-page "https://opensurge2d.org") (home-page "https://opensurge2d.org")