You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

91 lines
3.6 KiB

  1. ;;; GNU Guix --- Functional package management for GNU
  2. ;;; Copyright © 2013 Ludovic Courtès <ludo@gnu.org>
  3. ;;;
  4. ;;; This file is part of GNU Guix.
  5. ;;;
  6. ;;; GNU Guix is free software; you can redistribute it and/or modify it
  7. ;;; under the terms of the GNU General Public License as published by
  8. ;;; the Free Software Foundation; either version 3 of the License, or (at
  9. ;;; your option) any later version.
  10. ;;;
  11. ;;; GNU Guix is distributed in the hope that it will be useful, but
  12. ;;; WITHOUT ANY WARRANTY; without even the implied warranty of
  13. ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  14. ;;; GNU General Public License for more details.
  15. ;;;
  16. ;;; You should have received a copy of the GNU General Public License
  17. ;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
  18. (define-module (gnu packages geeqie)
  19. #:use-module (guix packages)
  20. #:use-module (guix download)
  21. #:use-module ((guix licenses)
  22. #:renamer (symbol-prefix-proc 'l:))
  23. #:use-module (guix build-system gnu)
  24. #:use-module (gnu packages pkg-config)
  25. #:use-module (gnu packages glib)
  26. #:use-module (gnu packages gtk)
  27. #:use-module (gnu packages libpng)
  28. #:use-module ((gnu packages ghostscript)
  29. #:select (lcms))
  30. #:use-module (gnu packages compression)
  31. #:use-module (gnu packages xml))
  32. (define-public exiv2 ; XXX: move elsewhere?
  33. (package
  34. (name "exiv2")
  35. (version "0.23")
  36. (source (origin
  37. (method url-fetch)
  38. (uri (string-append "http://www.exiv2.org/exiv2-"
  39. version ".tar.gz"))
  40. (sha256
  41. (base32
  42. "04bbg2cg6mgcyz435zamx37sp5zw44n2alb59ki1daz71f851yl1"))))
  43. (build-system gnu-build-system)
  44. (arguments '(#:tests? #f)) ; no `check' target
  45. (propagated-inputs
  46. `(("expat" ,expat) ("zlib" ,zlib)))
  47. (home-page "http://www.exiv2.org/")
  48. (synopsis "Library and command-line utility to manage image metadata")
  49. (description
  50. "Exiv2 is a C++ library and a command line utility to manage image
  51. metadata. It provides fast and easy read and write access to the Exif, IPTC
  52. and XMP metadata of images in various formats.")
  53. ;; Files under `xmpsdk' are a copy of Adobe's XMP SDK, licensed under the
  54. ;; 3-clause BSD license: <http://www.adobe.com/devnet/xmp/sdk/eula.html>.
  55. ;; The core is GPLv2+: <https://launchpad.net/ubuntu/precise/+source/exiv2/+copyright>.
  56. (license l:gpl2+)))
  57. (define-public geeqie
  58. (package
  59. (name "geeqie")
  60. (version "1.1")
  61. (source (origin
  62. (method url-fetch)
  63. (uri (string-append "mirror://sourceforge/geeqie/geeqie-"
  64. version ".tar.gz"))
  65. (sha256
  66. (base32
  67. "1kzy39z9505xkayyx7rjj2wda76xy3ch1s5z35zn8yli54ffhi2m"))))
  68. (build-system gnu-build-system)
  69. (inputs
  70. `(;; ("libchamplain" ,libchamplain)
  71. ("intltool" ,intltool)
  72. ("lcms" ,lcms)
  73. ("exiv2" ,exiv2)
  74. ("libpng" ,libpng)
  75. ("gtk+" ,gtk+-2)
  76. ("pkg-config" ,pkg-config)))
  77. (home-page "http://geeqie.sourceforge.net")
  78. (synopsis "Lightweight GTK+ based image viewer")
  79. (description
  80. "Geeqie is a lightweight GTK+ based image viewer for Unix like operating
  81. systems. It features: EXIF, IPTC and XMP metadata browsing and editing
  82. interoperability; easy integration with other software; geeqie works on files
  83. and directories, there is no need to import images; fast preview for many raw
  84. image formats; tools for image comparison, sorting and managing photo
  85. collection. Geeqie was initially based on GQview.")
  86. (license l:gpl2+)))