gnu: q5go: Update to 2.1.3.

* gnu/packages/games.scm (q5go): Update to 2.1.3.
  [native-inputs]: Add autoconf and automake.
  [arguments]: Delete 'fix-header' phase. 'Update 'fix-configure-script',
  'fix-paths' and 'install-desktop-file' phases.
This commit is contained in:
Guillaume Le Vaillant 2023-07-05 14:54:21 +02:00
parent b1ca5e50a4
commit 5ee2546f14
No known key found for this signature in database
GPG key ID: 6BE8208ADF21FE3F

View file

@ -42,7 +42,7 @@
;;; Copyright © 2019 Julien Lepiller <julien@lepiller.eu> ;;; Copyright © 2019 Julien Lepiller <julien@lepiller.eu>
;;; Copyright © 2019, 2020 Jesse Gibbons <jgibbons2357+guix@gmail.com> ;;; Copyright © 2019, 2020 Jesse Gibbons <jgibbons2357+guix@gmail.com>
;;; Copyright © 2019 Dan Frumin <dfrumin@cs.ru.nl> ;;; Copyright © 2019 Dan Frumin <dfrumin@cs.ru.nl>
;;; Copyright © 2019, 2020, 2021, 2022 Guillaume Le Vaillant <glv@posteo.net> ;;; Copyright © 2019-2023 Guillaume Le Vaillant <glv@posteo.net>
;;; Copyright © 2019, 2020 Timotej Lazar <timotej.lazar@araneo.si> ;;; Copyright © 2019, 2020 Timotej Lazar <timotej.lazar@araneo.si>
;;; Copyright © 2019 Josh Holland <josh@inv.alid.pw> ;;; Copyright © 2019 Josh Holland <josh@inv.alid.pw>
;;; Copyright © 2019 Pkill -9 <pkill9@runbox.com> ;;; Copyright © 2019 Pkill -9 <pkill9@runbox.com>
@ -10294,7 +10294,7 @@ (define-public leela-zero
(define-public q5go (define-public q5go
(package (package
(name "q5go") (name "q5go")
(version "1.0") (version "2.1.3")
(source (origin (source (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
@ -10303,10 +10303,10 @@ (define-public q5go
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 (base32
"1gdlfqcqkqv7vph3qwq78d0qz6dhmdsranxq9bmixiisbzkqby31")))) "0x8x7mp61g3lwabx9z4vsyd743kfqibnqhym7xd0b7811flca3ri"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(native-inputs (native-inputs
(list pkg-config)) (list autoconf automake pkg-config))
(inputs (inputs
(list qtbase-5 qtmultimedia-5 qtsvg-5)) (list qtbase-5 qtmultimedia-5 qtsvg-5))
(arguments (arguments
@ -10315,32 +10315,34 @@ (define-public q5go
(add-after 'unpack 'fix-configure-script (add-after 'unpack 'fix-configure-script
(lambda _ (lambda _
;; Bypass the unavailable qtchooser program. ;; Bypass the unavailable qtchooser program.
(substitute* "configure" (for-each delete-file
'("configure"
"Makefile.in"
"src/Makefile.in"
"src/translations/Makefile.in"))
(substitute* "configure.ac"
(("AC_PATH_PROG\\(qtchooser, .*\\)")
"")
(("test -z \"QTCHOOSER\"") (("test -z \"QTCHOOSER\"")
"false") "false")
(("qtchooser -run-tool=(.*) -qt=qt5" _ command) (("\\$\\(qtchooser -list-versions\\)")
command)) "qt5")
#t)) (("qtchooser -run-tool=(.*) -qt=\\$QT5_NAME" _ command)
(add-after 'unpack 'fix-header command))))
(lambda _
(substitute* "src/bitarray.h"
(("#include <cstring>" all)
(string-append all "\n#include <stdexcept>")))))
(add-after 'unpack 'fix-paths (add-after 'unpack 'fix-paths
(lambda _ (lambda* (#:key outputs #:allow-other-keys)
(substitute* '("src/pics/Makefile.in" (substitute* '("src/setting.cpp")
"src/translations/Makefile.in") (("/usr/share/\" PACKAGE \"/translations")
(("\\$\\(datadir\\)/qGo/") (string-append (assoc-ref outputs "out")
"$(datadir)/q5go/")) "/share/qGo/translations")))))
#t))
(add-after 'install 'install-desktop-file (add-after 'install 'install-desktop-file
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out")) (let* ((out (assoc-ref outputs "out"))
(apps (string-append out "/share/applications")) (apps (string-append out "/share/applications"))
(pics (string-append out "/share/q5go/pics"))) (images (string-append out "/share/qGo/images")))
(delete-file-recursively (string-append out "/share/applnk")) (delete-file-recursively (string-append out "/share/applnk"))
(delete-file-recursively (string-append out "/share/mimelnk")) (delete-file-recursively (string-append out "/share/mimelnk"))
(install-file "../source/src/pics/Bowl.ico" pics) (install-file "../source/src/images/Bowl.ico" images)
(mkdir-p apps) (mkdir-p apps)
(with-output-to-file (string-append apps "/q5go.desktop") (with-output-to-file (string-append apps "/q5go.desktop")
(lambda _ (lambda _
@ -10360,8 +10362,7 @@ (define-public q5go
Comment[zh]=围棋~@ Comment[zh]=围棋~@
Terminal=false~@ Terminal=false~@
Type=Application~%" Type=Application~%"
out pics)))) out images)))))))))
#t)))))
(synopsis "Qt GUI to play the game of Go") (synopsis "Qt GUI to play the game of Go")
(description (description
"This a tool for Go players which performs the following functions: "This a tool for Go players which performs the following functions: