;;; Copyright © 2016, 2017 Leo Famulari <leo@famulari.name>
;;; Copyright © 2017 Efraim Flashner <efraim@flashner.co.il>
;;; Copyright © 2017 Marius Bakke <mbakke@fastmail.com>
-;;; Copyright © 2018, 2019 Tobias Geerinckx-Rice <me@tobias.gr>
+;;; Copyright © 2018, 2019, 2020 Tobias Geerinckx-Rice <me@tobias.gr>
;;;
;;; This file is part of GNU Guix.
;;;
;; Note: With libgd.org now pointing to github.com, genuine old
;; tarballs are no longer available. Notably, versions 2.0.x are
;; missing.
- (version "2.2.5")
+ (version "2.3.0")
(source (origin
(method url-fetch)
(uri (string-append
version "/libgd-" version ".tar.xz"))
(sha256
(base32
- "0lfy5f241sbv8s3splm2zqiaxv7lxrcshh875xryryk7yk5jqc4c"))
-
- (patches (search-patches "gd-CVE-2018-5711.patch"
- "gd-CVE-2018-1000222.patch"
- "gd-CVE-2019-6977.patch"
- "gd-CVE-2019-6978.patch"
- "gd-fix-tests-on-i686.patch"
- "gd-freetype-test-failure.patch"))))
+ "0n5czhxzinvjvmhkf5l9fwjdx5ip69k5k7pj6zwb6zs1k9dibngc"))
+ (patches (search-patches "gd-fix-tests-on-i686.patch"
+ "gd-brect-bounds.patch"))))
(build-system gnu-build-system)
(arguments
;; As recommended by github.com/libgd/libgd/issues/278 to fix rounding
(native-inputs
`(("pkg-config" ,pkg-config)))
(inputs
- `(("freetype" ,freetype)
+ `(("fontconfig" ,fontconfig)
+ ("freetype" ,freetype)
+ ("libjpeg" ,libjpeg-turbo)
("libpng" ,libpng)
("zlib" ,zlib)))
- (propagated-inputs
- `(("fontconfig" ,fontconfig)
- ("libjpeg" ,libjpeg-turbo)))
(home-page "https://www.libgd.org/")
(synopsis "Library for the dynamic creation of images by programmers")
(description
(define-public perl-gd
(package
(name "perl-gd")
- (version "2.71")
+ (version "2.73")
(source
(origin
(method url-fetch)
(uri (string-append "mirror://cpan/authors/id/R/RU/RURBAN/"
"GD-" version ".tar.gz"))
(sha256
- (base32 "1ivskdb4nwy7ky37369hwkfxp11fkp6ri5k7qlf2dmra7f3y86s5"))))
+ (base32 "0arjpa8id6k5yjxfq0j2hsinhhjzjch5lwk6gscf48l54drrw729"))))
(build-system perl-build-system)
(inputs
`(("fontconfig" ,fontconfig)
("libpng" ,libpng)
("libjpeg" ,libjpeg-turbo)
("zlib" ,zlib)))
+ (native-inputs
+ `(("perl-extutils-pkgconfig" ,perl-extutils-pkgconfig)))
(arguments
`(#:make-maker-flags
(list (string-append "--lib_jpeg_path="