Subject: [PATCH] Add gimp-resynthesizer package
From: Thorsten Wilms <[email-masked]>
To: [email-masked]
Date: Sun, 7 Oct 2018 20:31:57 +0200
List-Id: <debbugs-submit.debbugs.gnu.org>

* gnu/packages/gimp.scm (gimp-resynthesizer): New variable.
---
  gnu/packages/gimp.scm | 61 +++++++++++++++++++++++++++++++++++++++++++
  1 file changed, 61 insertions(+)

diff --git a/gnu/packages/gimp.scm b/gnu/packages/gimp.scm
index df8f242c7..2e74f3128 100644
--- a/gnu/packages/gimp.scm
+++ b/gnu/packages/gimp.scm
@@ -4,6 +4,7 @@
  ;;; Copyright © 2016, 2017, 2018 Efraim Flashner <[email-masked]>
  ;;; Copyright © 2018 Tobias Geerinckx-Rice <[email-masked]>
  ;;; Copyright © 2018 Leo Famulari <[email-masked]>
+;;; Copyright © 2018 Thorsten Wilms <[email-masked]>
  ;;;
  ;;; This file is part of GNU Guix.
  ;;;
@@ -305,3 +306,63 @@ brushstrokes which is used by MyPaint and GIMP.")
  MyPaint.")
      (home-page "https://github.com/Jehan/mypaint-brushes")
      (license license:cc0)))
+
+(define-public gimp-resynthesizer
+  ;; GIMP does not respect any plugin search path environment variable, 
so after
+  ;; installation users have to edit their GIMP settings to include
+  ;; "$HOME/.guix-profile/lib/gimp/2.0/plug-ins/" in
+  ;; “Edit->Preferences->Folders->Plug Ins”.
+  (package
+   (name "gimp-resynthesizer")
+   (version "2.0.3")
+   (source
+    (origin
+     (method url-fetch)
+     (uri (string-append 
"https://github.com/bootchk/resynthesizer/archive/v"
+			 version
+			 ".tar.gz"))
+     (sha256 (base32 
"0l3404w6rqny7h3djskxf149gzx6x4qhndgbh3403c9lbh4pi1kr"))))
+   (build-system gnu-build-system)
+   (arguments
+    `(;; Turn off tests to avoid:
+      ;; make[1]: *** No rule to make target '../src/resynth-gui.c', 
needed by 'resynthesizer.pot'.  Stop.
+      #:tests? #f
+      #:phases
+      (modify-phases %standard-phases
+	(add-after 'unpack 'set-env
+	  (lambda _
+	    (setenv "CONFIG_SHELL" (which "sh"))
+	    #t))
+	(add-after 'configure 'set-prefix
+	  ;; Attempt to install to GIMP's plugin directory will fail.
+	  ;; Use own store address.
+          (lambda* (#:key outputs #:allow-other-keys)
+            (let ((target (string-append (assoc-ref outputs "out")
+                                         "/lib/gimp/"
+                                         (car (string-split 
,(package-version gimp) #\.))
+                                         ".0")))
+              (substitute* (list "src/resynthesizer/Makefile"
+				 "src/resynthesizer-gui/Makefile")
+		(("GIMP_LIBDIR = .*")
+                 (string-append "GIMP_LIBDIR = " target "\n")))
+              (mkdir-p target))
+            #t))
+	)))
+   (native-inputs
+    `(("autoconf" ,autoconf-wrapper)
+      ("automake" ,automake)
+      ("glib" ,glib "bin") ; glib-gettextize
+      ("intltool" ,intltool)
+      ("pkg-config" ,pkg-config)))
+   (inputs
+    `(("gimp" ,gimp)
+      ("gdk-pixbuf" ,gdk-pixbuf) ; needed by gimp-2.0.pc
+      ("cairo" ,cairo)
+      ("gegl" ,gegl)
+      ("gtk+" ,gtk+-2) ; needed by gimpui-2.0.pc
+      ("glib" ,glib)))
+   (home-page "https://github.com/bootchk/resynthesizer")
+   (synopsis "GIMP plugins for texture synthesis")
+   (description
+    "Resynthesizer plugins for GIMP. Encompasses tools for healing 
selections (content aware fill), enlarging the canvas and healing the 
border, increasing the resolution while adding detail and transfering 
the style of an image.")
+   (license license:gpl3+)))
-- 
2.19.0

-- 
Thorsten Wilms

thorwil's design for free software:
http://thorwil.wordpress.com/