me
/
guix
Archived
1
0
Fork 0
Code

gnu: tennix: Update to 1.3.4. 

* gnu/packages/games.scm (tennix): Update to 1.3.4.
[arguments]<#:phases>: Update style and remove fix-include phase.
[inputs]: Remove labels, update to SDL2, add SDL2_gfx dependency.
[license]: Remove LGPL license, as SDL_rotozoom is no longer included.

Signed-off-by: Christopher Baines <mail@cbaines.net>
master
Hendursaga 2023-09-04 19:09:12 -04:00 committed by Christopher Baines
parent 7f150a1895
commit 901eaca92b
No known key found for this signature in database
GPG Key ID: 5E28A33B0B84F577
1 changed files with 44 additions and 52 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

56
gnu/packages/games.scm
View File

@ -5571,65 +5571,57 @@ fullscreen, use F5 or Alt+Enter.")
(define-public tennix
(package
(name "tennix")
(version "1.3.1")
(source
(origin
(version "1.3.4")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://repo.or.cz/tennix.git")
(commit (string-append "tennix-" version))))
(file-name (git-file-name name version))
(sha256
(base32 "02cj4lrdrisal5s9pnbf2smx7qz9czczjzndfkhfx0qy67b957sk"))
(base32
"1fmg0vw8c2spyxy4k64nwky80jsw9mc3vnlch49q6cagjsg9y8dj"))
;; Remove non-free images.
(modules '((guix build utils)))
(snippet
'(begin
(snippet '(begin
(for-each delete-file
'("data/loc_training_camp.png"
"data/loc_austrian_open.png"
"data/loc_olympic_green_tennis.png"))
#t))))
"data/loc_olympic_green_tennis.png")) #t))))
(build-system gnu-build-system)
(arguments
`(#:tests? #f ;no test
#:phases
(modify-phases %standard-phases
(add-after 'unpack 'fix-include
(lambda _
(substitute* '("src/graphics.h" "src/sound.h")
(("#include \"(SDL_(image|ttf|mixer)\\.h)\"" _ header)
(string-append "#include \"SDL/" header "\"")))
(substitute* '("src/tennix.h" "src/network.h" "src/SDL_rotozoom.h")
(("#include <SDL.h>") "#include <SDL/SDL.h>")
(("#include <SDL_net.h>") "#include <SDL/SDL_net.h>"))
#t))
(list
#:tests? #f ;no tests
#:phases #~(modify-phases %standard-phases
(add-after 'unpack 'locate-install
;; Build process cannot expand "$(INSTALL)" in Makefile.
(lambda _
(substitute* "makefile"
(("^CONFIGURE_OUTPUT :=.*" all)
(string-append "INSTALL := install -c\n" all)))
#t))
(string-append "INSTALL := install -c\n" all))) #t))
(replace 'configure
;; The "configure" script is picky about the arguments it
;; gets. Call it ourselves.
(lambda _
(invoke "./configure" "--prefix" (assoc-ref %outputs "out")))))))
(native-inputs
(list which))
(inputs
`(("python" ,python-wrapper)
("sdl" ,(sdl-union (list sdl sdl-image sdl-mixer sdl-ttf sdl-net)))))
(invoke "./configure" "--prefix"
(assoc-ref %outputs "out")))))))
(native-inputs (list which))
(inputs (list python
(sdl-union (list sdl2
sdl2-image
sdl2-mixer
sdl2-ttf
sdl2-net
sdl2-gfx))))
(home-page "https://icculus.org/tennix/")
(synopsis "Play tennis against the computer or a friend")
(description "Tennix is a 2D tennis game. You can play against the
(description
"Tennix is a 2D tennis game. You can play against the
computer or against another player using the keyboard. The game runs
in-window at 640x480 resolution or fullscreen.")
;; Project is licensed under GPL2+ terms. It includes images
;; released under Public Domain terms, and SDL_rotozoom, released
;; under LGPL2.1 terms.
(license (list license:gpl2+ license:public-domain license:lgpl2.1))))
;; released under Public Domain terms.
(license (list license:gpl2+ license:public-domain))))
(define-public warzone2100
(package