From 571d55ef3270adfcd2c8cf80d400aec5e12528ab Mon Sep 17 00:00:00 2001
From: Amirouche Boubekki <amirou...@hypermove.net>
Date: Fri, 13 Nov 2015 15:09:08 +0100
Subject: [PATCH] gnu: images: Add jpegoptim 1.4.3
* gnu/packages/images.scm (jpegoptim): New variable jpegoptim
---
gnu/packages/image.scm | 24 ++++++++++++++++++++++++
1 file changed, 24 insertions(+)
diff --git a/gnu/packages/image.scm b/gnu/packages/image.scm
index bde327c..52717e7 100644
--- a/gnu/packages/image.scm
+++ b/gnu/packages/image.scm
@@ -4,6 +4,7 @@
;;; Copyright © 2014, 2015 Alex Kost <alez...@gmail.com>
;;; Copyright © 2014 Ricardo Wurmus <rek...@elephly.net>
;;; Copyright © 2015 Taylan Ulrich Bayırlı/Kammer <taylanbayi...@gmail.com>
+;;; Copyright © 2015 Amirouche Boubekki <amirou...@hypermove.net>
;;; Copyright © 2014 John Darrington <j...@gnu.org>
;;;
;;; This file is part of GNU Guix.
@@ -104,6 +105,29 @@ image files in PBMPLUS PPM/PGM, GIF, BMP, and Targa file formats.")
(sha256 (base32
"1cz0dy05mgxqdgjf52p54yxpyy95rgl30cnazdrfmw7hfca9n0h0"))))))
+(define-public jpegoptim
+ (package
+ (name "jpegoptim")
+ (version "1.4.3")
+ (source (origin
+ (method url-fetch)
+ (uri (string-append "http://www.kokkonen.net/tjko/src/jpegoptim-";
+ version ".tar.gz"))
+ (sha256 (base32
+ "0k53q7dc8w5ashz8v261x2b5vvz7gdvg8w962rz9gjvkjbh4lg93"))))
+ (build-system gnu-build-system)
+ (inputs `(("libjpeg" ,libjpeg)))
+ (arguments
+ ;; no tests
+ '(#:tests? #f))
+ (synopsis "Optimize JPEG images")
+ (description
+ "jpegoptim provides lossless optimization (based on optimizing
+the Huffman tables) and \"lossy\" optimization based on setting
+maximum quality factor.")
+ (license license:gpl2)
+ (home-page "http://www.kokkonen.net/tjko/projects.html#jpegoptim";)))
+
(define-public libtiff
(package
(name "libtiff")
--
2.4.3
