From 4334a43cbf0795efcf1a1feb34ad7d8234dc1657 Mon Sep 17 00:00:00 2001
From: FuncProgLinux <softwarelibre@urutau-ltd.org>
Date: Tue, 21 Oct 2025 18:28:57 -0600
Subject: [PATCH] gnu: pluma: Add missing inputs and improve build steps

* gnu/packages/mate.scm (pluma): Use gexps.
[inputs]: Remove enchant-1.6; add enchant, python-pygobject, python-wrapper,
python-pycairo, and python-six.
[native-inputs]: Add perl.

Change-Id: Iada5d8863281c704d00d15d644eca150f4fe80bd

Add missing perl input

Change-Id: Idc5461ce5a97483d4c017b21b909bedcc67a75d5
Signed-off-by: Andreas Enge <andreas@enge.fr>
---
 gnu/packages/mate.scm | 95 +++++++++++++++++++++++++++----------------
 1 file changed, 60 insertions(+), 35 deletions(-)

diff --git a/gnu/packages/mate.scm b/gnu/packages/mate.scm
index f60f229ce6984e857fd5b5ea10a85c22d6b6e42f..e9acf2839de6447de3cdc0dab9498f878e24e9e1 100644
--- a/gnu/packages/mate.scm
+++ b/gnu/packages/mate.scm
@@ -64,6 +64,7 @@
   #:use-module (gnu packages messaging)
   #:use-module (gnu packages multiprecision)
   #:use-module (gnu packages nss)
+  #:use-module (gnu packages perl)
   #:use-module (gnu packages pdf)
   #:use-module (gnu packages photo)
   #:use-module (gnu packages pkg-config)
@@ -1581,47 +1582,71 @@ can be used as backgrounds in the MATE Desktop environment.")
     (source
      (origin
        (method url-fetch)
-       (uri (string-append "mirror://mate/" (version-major+minor version) "/"
-                           name "-" version ".tar.xz"))
+       (uri (string-append "mirror://mate/"
+                           (version-major+minor version)
+                           "/"
+                           name
+                           "-"
+                           version
+                           ".tar.xz"))
        (sha256
         (base32 "1m51cmcl6z68bx37zhi72wfl58kq9bg7xcih1sjr6l1li6axz2ma"))))
     (build-system glib-or-gtk-build-system)
     (arguments
-     `(; Tests can not succeed.
-       ;; https://github.com/mate-desktop/mate-text-editor/issues/33
-       #:tests? #f))
-    (native-inputs
-     `(("gettext" ,gettext-minimal)
-       ("gtk-doc" ,gtk-doc/stable)
-       ("gobject-introspection" ,gobject-introspection)
-       ("intltool" ,intltool)
-       ("libtool" ,libtool)
-       ("pkg-config" ,pkg-config)
-       ("yelp-tools" ,yelp-tools)))
-    (inputs
-     (list at-spi2-core
-           cairo
-           enchant-1.6
-           glib
-           gtk+
-           gtksourceview-4
-           gdk-pixbuf
-           iso-codes/pinned
-           libcanberra
-           libx11
-           libsm
-           libpeas
-           libxml2
-           libice
-           mate-desktop
-           packagekit
-           pango
-           python
-           startup-notification))
+     (list
+      #:configure-flags
+      #~(list "--enable-python")
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'install 'wrap-pluma
+            (lambda* (#:key outputs #:allow-other-keys)
+              (wrap-program (search-input-file outputs "bin/pluma")
+                ;; For plugins (same as gedit).
+                `("GI_TYPELIB_PATH" ":" prefix
+                  (,(getenv "GI_TYPELIB_PATH")))
+                `("GUIX_PYTHONPATH" ":" prefix
+                  (,(getenv "GUIX_PYTHONPATH")))
+                ;; For language-specs.
+                `("XDG_DATA_DIRS" ":" prefix
+                  (,(string-append #$(this-package-input "gtksourceview")
+                                   "/share")))))))
+      ;; Tests can not succeed.
+      ;; https://github.com/mate-desktop/mate-text-editor/issues/33
+      #:tests? #f))
+    (native-inputs (list gettext-minimal
+                         gtk-doc/stable
+                         gobject-introspection
+                         intltool
+                         libtool
+                         perl
+                         pkg-config
+                         yelp-tools))
+    (inputs (list at-spi2-core
+                  cairo
+                  enchant
+                  glib
+                  gtk+
+                  gtksourceview-4
+                  gdk-pixbuf
+                  iso-codes/pinned
+                  libcanberra
+                  libx11
+                  libsm
+                  libpeas
+                  libxml2
+                  libice
+                  mate-desktop
+                  packagekit
+                  pango
+                  python
+                  python-pygobject
+                  python-wrapper
+                  python-pycairo
+                  python-six
+                  startup-notification))
     (home-page "https://mate-desktop.org/")
     (synopsis "Text Editor for MATE")
-    (description
-     "Pluma is the text editor for the MATE Desktop.")
+    (description "Pluma is the text editor for the MATE Desktop.")
     (license license:gpl2)))
 
 (define-public mate-system-monitor