gnu: viewnior: Update to 1.7.

* gnu/packages/image-viewers.scm (viewnior): Update to 1.7.
[source]: Update source uri.
[build-system]: Switch to meson-build-system.
[arguments]: Remove custom 'autogen and 'skip-gtk-update-icon-cache
phases, add 'patch-source phase.  Skip tests.
[native-inputs]: Remove automake, autoconf, intltool, gnome-common,
libtool, which, add gettext-minimal.
[home-page]: Update home-page.
This commit is contained in:
Efraim Flashner 2018-05-13 20:23:11 +03:00
parent e42c3649d8
commit 307cdd665e
No known key found for this signature in database
GPG Key ID: 41AAE7DCCA3D8351
1 changed files with 15 additions and 21 deletions

View File

@ -2,7 +2,7 @@
;;; Copyright © 2013, 2017, 2018 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2013, 2017, 2018 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2014 Ian Denhardt <ian@zenhack.net> ;;; Copyright © 2014 Ian Denhardt <ian@zenhack.net>
;;; Copyright © 2015, 2016 Alex Kost <alezost@gmail.com> ;;; Copyright © 2015, 2016 Alex Kost <alezost@gmail.com>
;;; Copyright © 2016, 2017 Efraim Flashner <efraim@flashner.co.il> ;;; Copyright © 2016, 2017, 2018 Efraim Flashner <efraim@flashner.co.il>
;;; Copyright © 2017 Alex Griffin <a@ajgrf.com> ;;; Copyright © 2017 Alex Griffin <a@ajgrf.com>
;;; Copyright © 2017 Nils Gillmann <ng0@n0.is> ;;; Copyright © 2017 Nils Gillmann <ng0@n0.is>
;;; Copyright © 2017 Mathieu Othacehe <m.othacehe@gmail.com> ;;; Copyright © 2017 Mathieu Othacehe <m.othacehe@gmail.com>
@ -31,14 +31,15 @@
#:use-module (guix packages) #:use-module (guix packages)
#:use-module (guix build-system gnu) #:use-module (guix build-system gnu)
#:use-module (guix build-system cmake) #:use-module (guix build-system cmake)
#:use-module (guix build-system meson)
#:use-module (guix build-system python) #:use-module (guix build-system python)
#:use-module (gnu packages autotools) #:use-module (gnu packages autotools)
#:use-module (gnu packages algebra) #:use-module (gnu packages algebra)
#:use-module (gnu packages base)
#:use-module (gnu packages boost) #:use-module (gnu packages boost)
#:use-module (gnu packages compression) #:use-module (gnu packages compression)
#:use-module (gnu packages curl) #:use-module (gnu packages curl)
#:use-module (gnu packages fontutils) #:use-module (gnu packages fontutils)
#:use-module (gnu packages gettext)
#:use-module (gnu packages ghostscript) #:use-module (gnu packages ghostscript)
#:use-module (gnu packages glib) #:use-module (gnu packages glib)
#:use-module (gnu packages gnome) #:use-module (gnu packages gnome)
@ -231,43 +232,36 @@ it and customize it for your needs.")
(define-public viewnior (define-public viewnior
(package (package
(name "viewnior") (name "viewnior")
(version "1.6") (version "1.7")
(source (source
(origin (origin
(method url-fetch) (method url-fetch)
(uri (string-append "https://github.com/xsisqox/Viewnior/archive/" (uri (string-append "https://github.com/hellosiyan/Viewnior/archive/"
name "-" version ".tar.gz")) name "-" version ".tar.gz"))
(sha256 (sha256
(base32 (base32
"18309qjgwak3kn228z3p3nx7yxasqgzx69v3rgc23hf161nky0c9")))) "1rpkk721s3xas125q3g0fl11b5zsrmzv9pzl6ddzcy4sj2rd7ymr"))))
(build-system gnu-build-system) (build-system meson-build-system)
(arguments (arguments
'(#:phases '(#:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(add-after 'unpack 'autogen (add-after 'unpack 'patch-source
(lambda _
(zero? (system* "sh" "autogen.sh"))))
(add-before 'install 'skip-gtk-update-icon-cache
(lambda _ (lambda _
;; Don't create 'icon-theme.cache' ;; Don't create 'icon-theme.cache'
(substitute* (find-files "data" "^Makefile$") (substitute* "meson.build"
(("gtk-update-icon-cache") (which "true"))) (("meson.add_install_script*") ""))
#t))))) #t)))
#:tests? #f)) ; no tests
(native-inputs (native-inputs
`(("automake" ,automake) `(("gettext" ,gettext-minimal)
("autoconf" ,autoconf)
("intltool" ,intltool)
("glib" ,glib "bin") ; glib-genmarshal ("glib" ,glib "bin") ; glib-genmarshal
("gnome-common" ,gnome-common)
("libtool" ,libtool)
("pkg-config" ,pkg-config) ("pkg-config" ,pkg-config)
("shared-mime-info" ,shared-mime-info) ("shared-mime-info" ,shared-mime-info)))
("which" ,which)))
(inputs (inputs
`(("exiv2" ,exiv2) `(("exiv2" ,exiv2)
("gdk-pixbuf" ,gdk-pixbuf) ("gdk-pixbuf" ,gdk-pixbuf)
("gtk+-2" ,gtk+-2))) ("gtk+-2" ,gtk+-2)))
(home-page "http://siyanpanayotov.com/project/viewnior/") (home-page "http://siyanpanayotov.com/project/viewnior")
(synopsis "Simple, fast and elegant image viewer") (synopsis "Simple, fast and elegant image viewer")
(description "Viewnior is an image viewer program. Created to be simple, (description "Viewnior is an image viewer program. Created to be simple,
fast and elegant. Its minimalistic interface provides more screenspace for fast and elegant. Its minimalistic interface provides more screenspace for