From mboxrd@z Thu Jan 1 00:00:00 1970 From: Tobias Geerinckx-Rice Subject: [PATCH] gnu: Add perceptualdiff. Date: Sun, 24 Jul 2016 05:43:25 +0200 Message-ID: <20160724034325.16952-1-me@tobias.gr> Mime-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:59104) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bRAJG-0005AV-22 for guix-devel@gnu.org; Sat, 23 Jul 2016 23:42:35 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1bRAJC-0001lj-H9 for guix-devel@gnu.org; Sat, 23 Jul 2016 23:42:33 -0400 Received: from relay4-d.mail.gandi.net ([2001:4b98:c:538::196]:57962) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bRAJC-0001lc-AW for guix-devel@gnu.org; Sat, 23 Jul 2016 23:42:30 -0400 Received: from mfilter36-d.gandi.net (mfilter36-d.gandi.net [217.70.178.167]) by relay4-d.mail.gandi.net (Postfix) with ESMTP id 4C3A41720A4 for ; Sun, 24 Jul 2016 05:42:29 +0200 (CEST) Received: from relay4-d.mail.gandi.net ([IPv6:::ffff:217.70.183.196]) by mfilter36-d.gandi.net (mfilter36-d.gandi.net [::ffff:10.0.15.180]) (amavisd-new, port 10024) with ESMTP id PVin42Nmh0Jw for ; Sun, 24 Jul 2016 05:42:27 +0200 (CEST) Received: from sandstone.cloud.online.net (unknown [163.172.141.64]) (Authenticated sender: me@tobias.gr) by relay4-d.mail.gandi.net (Postfix) with ESMTPSA id D0AEA17209F for ; Sun, 24 Jul 2016 05:42:27 +0200 (CEST) List-Id: "Development of GNU Guix and the GNU System distribution." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org Sender: "Guix-devel" To: guix-devel@gnu.org * gnu/packages/image.scm (perceptualdiff): New variable. --- gnu/packages/image.scm | 32 ++++++++++++++++++++++++++++++++ 1 file changed, 32 insertions(+) diff --git a/gnu/packages/image.scm b/gnu/packages/image.scm index 188d142..7d72492 100644 --- a/gnu/packages/image.scm +++ b/gnu/packages/image.scm @@ -8,6 +8,7 @@ ;;; Copyright © 2014 John Darrington ;;; Copyright © 2016 Leo Famulari ;;; Copyright © 2016 Efraim Flashner +;;; Copyright © 2016 Tobias Geerinckx-Rice ;;; ;;; This file is part of GNU Guix. ;;; @@ -801,3 +802,34 @@ the programmer.") ;; test/extra/ contains musl-libm, ;; which is MIT/expat licensed, but only used for tests (license (license:fsf-free "file://COPYING")))) ;WTFPL version 2 + +(define-public perceptualdiff + (package + (name "perceptualdiff") + (version "1.3") + (source + (origin + (method url-fetch) + (uri (string-append "https://github.com/myint/perceptualdiff/archive/v" + version ".tar.gz")) + (file-name (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "0zl6xmp971fffg7fzcz2fbgxg5x2w7l8qa65c008i4kbkc9016ps")))) + (build-system cmake-build-system) + (inputs `(("freeimage" ,freeimage))) + (arguments + '(#:phases (modify-phases %standard-phases + (add-after 'unpack 'fix-tests + ;; cmake-build-system uses a build/ directory outside + ;; of the source tree, one level higher than expected + (lambda _ + (substitute* "test/run_tests.bash" + (("../build") "../../build"))))))) + (home-page "https://github.com/myint/perceptualdiff") + (synopsis "Perceptual image comparison utility") + (description "PerceptualDiff visually compares two images to determine +whether they look alike. It uses a computational model of the human visual +system to detect similarities. This allows it too see beyond irrelevant +differences in file encoding, image quality, and other small variations.") + (license license:gpl2+))) -- 2.9.0