me/guix
Archived
1
0
Fork 0
Code Activity

gnu: retux: Update to 1.4.1-1.

Browse source 
* gnu/packages/games.scm (retux): Add let binding and update to 1.4.1-1.
[version]: Update version string.
[source]: Update URL.
This commit is contained in:
Kei Kebreau 2020-09-18 09:23:52 -04:00
parent fb420edd20
commit 5d351adaca
No known key found for this signature in database
GPG key ID: E6A5EE3C19467A0D
1 changed files with 54 additions and 49 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

103
gnu/packages/games.scm
View file

@ -1811,58 +1811,63 @@ Every puzzle has a complete solution, although there may be more than one.")
(license license:gpl2+))) (license license:gpl2+)))
(define-public retux (define-public retux
(package (let ((release "1.4.1")
(name "retux") (revision 1))
(version "1.4") (package
(source (origin (name "retux")
(method url-fetch) (version (if (zero? revision)
(uri (string-append "https://github.com/retux-game/retux/" release
"releases/download/v" (string-append release "-"
(version-major+minor version) "/retux-" (number->string revision))))
version "-src.tar.gz")) (source (origin
(sha256 (method url-fetch)
(base32 (uri (string-append "https://github.com/retux-game/retux/"
"1hxy1pvlxhk0ci3wh2i3mmr82faqdjnnxsiwwr5gcr93nfnw9w5f")))) "releases/download/v"
(build-system python-build-system) version "/retux-"
(arguments release "-src.tar.gz"))
`(#:tests? #f ; no check target (sha256
#:phases (base32
(modify-phases %standard-phases "1vrldg2qh2gqfswj7vkpc589ldrrjd903j6cnfdik9zh0jhlq4h2"))))
;; no setup.py script (build-system python-build-system)
(delete 'build) (arguments
(replace 'install `(#:tests? #f ; no check target
(lambda* (#:key outputs #:allow-other-keys) #:phases
(let* ((out (assoc-ref outputs "out")) (modify-phases %standard-phases
(bin (string-append out "/bin")) ;; no setup.py script
(data (string-append out "/share/retux"))) (delete 'build)
(mkdir-p bin) (replace 'install
(lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))
(bin (string-append out "/bin"))
(data (string-append out "/share/retux")))
(mkdir-p bin)
(substitute* "retux.py" (substitute* "retux.py"
;; Use the correct data directory. ;; Use the correct data directory.
(("os\\.path\\.join\\(os\\.path\\.dirname\\(__file__\\), \"data\"\\),") (("os\\.path\\.join\\(os\\.path\\.dirname\\(__file__\\), \"data\"\\),")
(string-append "\"" data "\","))) (string-append "\"" data "\",")))
(copy-file "retux.py" (string-append bin "/retux")) (copy-file "retux.py" (string-append bin "/retux"))
(copy-recursively "data" data) (copy-recursively "data" data)
#t)))))) #t))))))
(inputs (inputs
`(("python-sge-pygame" ,python-sge-pygame) `(("python-sge-pygame" ,python-sge-pygame)
("python-six" ,python-six) ("python-six" ,python-six)
("python-xsge" ,python-xsge))) ("python-xsge" ,python-xsge)))
(home-page "https://retux-game.github.io/") (home-page "https://retux-game.github.io/")
(synopsis "Action platformer game") (synopsis "Action platformer game")
(description (description
"ReTux is an action platformer loosely inspired by the Mario games, "ReTux is an action platformer loosely inspired by the Mario games,
utilizing the art assets from the @code{SuperTux} project.") utilizing the art assets from the @code{SuperTux} project.")
;; GPL version 3 or later is the license for the code and some art. ;; GPL version 3 or later is the license for the code and some art.
;; The rest of the licenses are for the art exclusively, as listed in ;; The rest of the licenses are for the art exclusively, as listed in
;; data/LICENSES. ;; data/LICENSES.
(license (list license:cc0 (license (list license:cc0
license:cc-by3.0 license:cc-by3.0
license:cc-by-sa3.0 license:cc-by-sa3.0
license:cc-by-sa4.0 license:cc-by-sa4.0
license:gpl2+ license:gpl2+
license:gpl3+)))) license:gpl3+)))))
(define-public roguebox-adventures (define-public roguebox-adventures
(package (package