me
/
guix
Archived
1
0
Fork 0

gnu: geeqie: Update to 1.5.

* gnu/packages/image-viewers.scm (geeqie): Update to 1.5.
[arguments]: Add "--enable-gtk3" to #:configure-flags.  Remove #:parallel-build?
and #:phases.
Ludovic Courtès 2020-06-30 00:03:50 +02:00
parent 172ca314c3
commit e3e757edf9
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 35 additions and 66 deletions

View File

@ -120,54 +120,23 @@ actions.")
"See 'COPYING' in the distribution."))))
(define-public geeqie
;; The latest release, 1.4, fails to build with Exiv2 0.27.1. The upstream
;; repo has several fixes for that, so take a snapshot.
(let ((commit "c220ddefb1b6b11b54f7598f0d44dd0723325ed4")
(revision "1"))
(package
(name "geeqie")
(version (git-version "1.4" revision commit))
(version "1.5")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/BestImageViewer/geeqie")
(commit commit)))
(commit (string-append "v" version))))
(sha256
(base32
"07424nzrnwbksgalgg1a6ig2snd986w79kca1cfnv1q9kc7x2h3x"))
"0nf45sh3pwsv98sppcrqj81b6mdi31n1sbc7gn88m8mhpfp1qq6k"))
(file-name (git-file-name name version))))
(build-system gnu-build-system)
(arguments
`( ;; Enable support for a "map" pane using GPS data.
#:configure-flags '("--enable-map")
;; Parallel builds fail with something like:
;; image-load.c:143:9: error: gq_marshal_VOID__INT_INT_INT_INT undeclared
;; due to unexpressed makefile dependencies.
#:parallel-build? #f
#:phases
(modify-phases %standard-phases
(add-before 'bootstrap 'pre-bootstrap
(lambda _
(define (write-dummy-changelog port)
(display "See Git history for a change log.\n" port))
;; Create ChangeLog{,.html} to placate the makefile, which would
;; otherwise require access to the Git repo.
(call-with-output-file "ChangeLog"
write-dummy-changelog)
(call-with-output-file "ChangeLog.html"
write-dummy-changelog)
;; Don't try to run 'git' for the version number.
(substitute* "configure.ac"
(("m4_esyscmd_s\\([^)]+\\)")
(string-append "[" ,version "]")))
;; Remove references to non-existent files.
(substitute* "po/POTFILES.in"
(("^plugins/import/.*") ""))
#t)))))
#:configure-flags '("--enable-map"
"--enable-gtk3")))
(inputs
`(("clutter" ,clutter)
("libchamplain" ,libchamplain)
@ -190,7 +159,7 @@ interoperability; easy integration with other software; geeqie works on files
and directories, there is no need to import images; fast preview for many raw
image formats; tools for image comparison, sorting and managing photo
collection. Geeqie was initially based on GQview.")
(license license:gpl2+))))
(license license:gpl2+)))
(define-public gpicview
(package