diff options
author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2022-02-14 00:45:33 +0100 |
---|---|---|
committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2022-02-14 00:45:33 +0100 |
commit | c81b0dcc72dca16ec966dbde106b5d5623226a93 (patch) | |
tree | 7d106cb5a45d6c36c44ea26751ca431a580862cd /gnu/packages/image-viewers.scm | |
parent | d65979c46c99dc36324ca94aa9650b9de37f22de (diff) | |
download | guix-c81b0dcc72dca16ec966dbde106b5d5623226a93.tar.gz guix-c81b0dcc72dca16ec966dbde106b5d5623226a93.zip |
gnu: qview: Update to 5.0.
* gnu/packages/image-viewers.scm (qview): Update to 5.0.
[build-system]: Use QT-BUILD-SYSTEM.
[arguments]<#:phases>: Use G-expressions. Remove trailing #T. Add a new phase
for tests.
[native-inputs]: Add QTTOOLS.
[inputs]: Re-order alphabetically.
Diffstat (limited to 'gnu/packages/image-viewers.scm')
-rw-r--r-- | gnu/packages/image-viewers.scm | 47 |
1 files changed, 28 insertions, 19 deletions
diff --git a/gnu/packages/image-viewers.scm b/gnu/packages/image-viewers.scm index 641b5a52da..6f8889e3a0 100644 --- a/gnu/packages/image-viewers.scm +++ b/gnu/packages/image-viewers.scm @@ -9,7 +9,7 @@ ;;; Copyright © 2017 nee <nee-git@hidamari.blue> ;;; Copyright © 2018–2021 Tobias Geerinckx-Rice <me@tobias.gr> ;;; Copyright © 2018, 2019 Ricardo Wurmus <rekado@elephly.net> -;;; Copyright © 2019 Nicolas Goaziou <mail@nicolasgoaziou.fr> +;;; Copyright © 2019, 2022 Nicolas Goaziou <mail@nicolasgoaziou.fr> ;;; Copyright © 2019, 2020, 2022 Guy Fleury Iteriteka <gfleury@disroot.org> ;;; Copyright © 2019 Pierre Langlois <pierre.langlois@gmx.com> ;;; Copyright © 2020 Peng Mei Yu <pengmeiyu@riseup.net> @@ -42,6 +42,7 @@ (define-module (gnu packages image-viewers) #:use-module ((guix licenses) #:prefix license:) #:use-module (guix download) + #:use-module (guix gexp) #:use-module (guix git-download) #:use-module (guix packages) #:use-module (guix utils) @@ -49,6 +50,7 @@ #:use-module (guix build-system cmake) #:use-module (guix build-system meson) #:use-module (guix build-system python) + #:use-module (guix build-system qt) #:use-module (gnu packages autotools) #:use-module (gnu packages algebra) #:use-module (gnu packages backup) @@ -745,7 +747,7 @@ For PDF support, install the @emph{mupdf} package.") (define-public qview (package (name "qview") - (version "4.0") + (version "5.0") (source (origin (method git-fetch) @@ -754,25 +756,32 @@ For PDF support, install the @emph{mupdf} package.") (commit version))) (file-name (git-file-name name version)) (sha256 - (base32 "15n9cq7w3ckinnx38hvncxrbkv4qm4k51sal41q4y0pkvhmafhnr")))) - (build-system gnu-build-system) + (base32 "1ck4mvhzc4m72n010n43d8ipjczzk6ya637rgfyi7bzb4gv0f3am")))) + (build-system qt-build-system) (arguments - `(#:phases - (modify-phases %standard-phases - (replace 'configure - (lambda* (#:key outputs #:allow-other-keys) - (let ((out (assoc-ref outputs "out"))) - (invoke "qmake" (string-append "PREFIX=" out))))) - ;; Don't phone home or show "Checking for updates..." in the About - ;; menu. - (add-before 'build 'disable-auto-update - (lambda _ - (substitute* "src/qvaboutdialog.cpp" - (("qvApp->checkUpdates\\(\\);") "") - (("updateText\\(\\);") "")) - #t))))) + (list + #:phases + #~(modify-phases %standard-phases + (replace 'configure + (lambda* (#:key outputs #:allow-other-keys) + (invoke "qmake" (string-append "PREFIX=" #$output)))) + ;; Don't phone home or show "Checking for updates..." in the About + ;; menu. + (add-before 'build 'disable-auto-update + (lambda _ + (substitute* "src/qvaboutdialog.cpp" + (("qvApp->checkUpdates\\(\\);") "") + (("updateText\\(\\);") "")))) + (replace 'check + (lambda* (#:key tests? #:allow-other-keys) + (when tests? + (with-directory-excursion "tests" + (invoke "qmake" "tests.pro") + (invoke "make" "tests")))))))) + (native-inputs + (list qttools)) (inputs - (list qtbase-5 qtsvg qtimageformats)) + (list qtbase-5 qtimageformats qtsvg)) (home-page "https://interversehq.com/qview/") (synopsis "Convenient and minimal image viewer") (description "qView is a Qt image viewer designed with visually |