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.

148 lines
5.7 KiB

Use #:prefix instead of #:renamer with 'symbol-prefix-proc'. * gnu/packages/abiword.scm, gnu/packages/admin.scm, gnu/packages/aidc.scm, gnu/packages/backup.scm, gnu/packages/bittorrent.scm, gnu/packages/boost.scm, gnu/packages/compression.scm, gnu/packages/cryptsetup.scm, gnu/packages/curl.scm, gnu/packages/cyrus-sasl.scm, gnu/packages/dc.scm, gnu/packages/emacs.scm, gnu/packages/fonts.scm, gnu/packages/fontutils.scm, gnu/packages/geeqie.scm, gnu/packages/ghostscript.scm, gnu/packages/gimp.scm, gnu/packages/gkrellm.scm, gnu/packages/gl.scm, gnu/packages/glib.scm, gnu/packages/gnome.scm, gnu/packages/gnunet.scm, gnu/packages/gnupg.scm, gnu/packages/gnutls.scm, gnu/packages/gnuzilla.scm, gnu/packages/gsasl.scm, gnu/packages/gtk.scm, gnu/packages/gv.scm, gnu/packages/image.scm, gnu/packages/indent.scm, gnu/packages/inkscape.scm, gnu/packages/lesstif.scm, gnu/packages/links.scm, gnu/packages/lisp.scm, gnu/packages/lsh.scm, gnu/packages/lsof.scm, gnu/packages/maths.scm, gnu/packages/mp3.scm, gnu/packages/openssl.scm, gnu/packages/ots.scm, gnu/packages/pciutils.scm, gnu/packages/pcre.scm, gnu/packages/pdf.scm, gnu/packages/pulseaudio.scm, gnu/packages/python.scm, gnu/packages/slim.scm, gnu/packages/ssh.scm, gnu/packages/texlive.scm, gnu/packages/vim.scm, gnu/packages/vpn.scm, gnu/packages/web.scm, gnu/packages/wv.scm, gnu/packages/xiph.scm, gnu/packages/xml.scm, gnu/packages/xorg.scm, gnu/packages/yasm.scm, gnu/packages/zip.scm, guix/build/cmake-build-system.scm, guix/build/perl-build-system.scm, guix/build/python-build-system.scm, guix/download.scm: Replaces uses of #:renamer and 'symbol-prefix-proc' with #:prefix.
7 years ago
  1. ;;; GNU Guix --- Functional package management for GNU
  2. ;;; Copyright © 2014 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 gimp)
  19. #:use-module (guix packages)
  20. #:use-module (guix download)
  21. #:use-module ((guix licenses) #:prefix license:)
  22. #:use-module (guix build-system gnu)
  23. #:use-module (gnu packages pkg-config)
  24. #:use-module (gnu packages glib)
  25. #:use-module (gnu packages gtk)
  26. #:use-module (gnu packages gnome)
  27. #:use-module (gnu packages image)
  28. #:use-module ((gnu packages ghostscript)
  29. #:select (lcms))
  30. #:use-module (gnu packages compression)
  31. #:use-module (gnu packages xml)
  32. #:use-module (gnu packages photo)
  33. #:use-module (gnu packages xorg)
  34. #:use-module (gnu packages imagemagick))
  35. (define-public babl
  36. (package
  37. (name "babl")
  38. (version "0.1.10")
  39. (source (origin
  40. (method url-fetch)
  41. (uri (list (string-append "http://ftp.gtk.org/pub/babl/0.1/babl-"
  42. version ".tar.bz2")
  43. (string-append "ftp://ftp.gtk.org/pub/babl/0.1/babl-"
  44. version ".tar.bz2")))
  45. (sha256
  46. (base32
  47. "1x2mb7zfbvk9d0a7h5cpdff9hhjsadxvqml2jay2bpf7x9nc6gwl"))))
  48. (build-system gnu-build-system)
  49. (home-page "http://gegl.org/babl/")
  50. (synopsis "Image pixel format conversion library")
  51. (description
  52. "babl is a dynamic, any to any, pixel format translation library.
  53. It allows converting between different methods of storing pixels known as
  54. pixel formats that have with different bitdepths and other data
  55. representations, color models and component permutations.
  56. A vocabulary to formulate new pixel formats from existing primitives is
  57. provided as well as the framework to add new color models and data types.")
  58. (license license:lgpl3+)))
  59. (define-public gegl
  60. (package
  61. (name "gegl")
  62. (version "0.2.0")
  63. (source (origin
  64. (method url-fetch)
  65. (uri (list (string-append "http://download.gimp.org/pub/gegl/"
  66. (string-take version 3)
  67. "/" name "-" version ".tar.bz2")))
  68. (sha256
  69. (base32
  70. "09nlv06li9nrn74ifpm7223mxpg0s7cii702z72cpbwrjh6nlbnz"))))
  71. (build-system gnu-build-system)
  72. (arguments
  73. `(#:phases
  74. (alist-cons-before
  75. 'build 'pre-build
  76. (lambda _
  77. ;; This test program seems to crash on exit. Specifically, whilst
  78. ;; g_object_unreffing bufferA and bufferB - This seems to be a bug
  79. ;; in the destructor. This is just a test program so will not have
  80. ;; any wider effect, although might be hiding another problem.
  81. ;; According to advice received on irc.gimp.org#gegl although 0.2.0
  82. ;; is the latest released version, any bug reports against it will
  83. ;; be ignored. So we are on our own.
  84. (substitute* "tools/img_cmp.c"
  85. (("g_object_unref \\(buffer.\\);") ""))
  86. (substitute* "tests/compositions/Makefile"
  87. (("/bin/sh") (which "bash"))))
  88. %standard-phases)))
  89. (inputs
  90. `(("babl" ,babl)
  91. ("glib" ,glib)
  92. ("cairo" ,cairo)
  93. ("pango" ,pango)
  94. ("libpng" ,libpng)
  95. ("libjpeg" ,libjpeg-8)))
  96. (native-inputs
  97. `(("pkg-config" ,pkg-config)
  98. ("glib" ,glib "bin") ; for gtester
  99. ("intltool" ,intltool)))
  100. (home-page "http://gegl.org")
  101. (synopsis "Graph based image processing framework")
  102. (description "GEGL (Generic Graphics Library) provides infrastructure to
  103. do demand based cached non destructive image editing on larger than RAM
  104. buffers.")
  105. ;; The library itself is licensed under LGPL while the sample commandline
  106. ;; application and GUI binary gegl is licensed under GPL.
  107. (license (list license:lgpl3+ license:gpl3+))))
  108. (define-public gimp
  109. (package
  110. (name "gimp")
  111. (version "2.8.10")
  112. (source (origin
  113. (method url-fetch)
  114. (uri (string-append "http://download.gimp.org/pub/gimp/v2.8/gimp-"
  115. version ".tar.bz2"))
  116. (sha256
  117. (base32
  118. "1rha8yx0pplfjziqczjrxxp16vsvpmb5ziq3c218s4w9z4cqpzg7"))))
  119. (build-system gnu-build-system)
  120. (arguments
  121. `(#:configure-flags
  122. ;; We don't have pygtk which seems to be needed for this feature
  123. `("--disable-python" )))
  124. (inputs
  125. `(("babl" ,babl)
  126. ("glib" ,glib)
  127. ("libtiff" ,libtiff)
  128. ("libjpeg" ,libjpeg-8)
  129. ("atk" ,atk)
  130. ("gtk+" ,gtk+-2)
  131. ("gegl" ,gegl)))
  132. (native-inputs
  133. `(("pkg-config" ,pkg-config)
  134. ("intltool" ,intltool)))
  135. (home-page "http://gimp.org")
  136. (synopsis "GNU Image Manipulation Program")
  137. (description
  138. "GIMP is an application for image manipulation tasks such as photo
  139. retouching, composition and authoring. It supports all common image formats
  140. as well as specialized ones. It features a highly customizable interface
  141. that is extensible via a plugin system.")
  142. (license license:gpl3+))) ; some files are lgplv3