From 08de1612748c58ace7b77deb5859ac9bb89dd2b2 Mon Sep 17 00:00:00 2001
From: Liliana Marie Prikler <liliana.prikler@gmail.com>
Date: Sun, 7 Apr 2024 10:54:21 +0200
Subject: [PATCH] gnu: Fix builds that require old blueprint-compiler.

This is a follow-up commit to cee21ef8650d723e9e1ea4c6313897fd3bf64112 and
fixes two builds that rely on an older version of blueprint-compiler.
The giara package remains broken as a result of a test failure.

* gnu/packages/gnome.scm (blueprint-compiler-0.4): New variable.
* gnu/packages/syndication.scm (giara, gfeeds): Replace blueprint-compiler
with blueprint-compiler-0.4.
* gnu/packages/text-editors.scm (textpieces): Likewise
---
 gnu/packages/gnome.scm        | 16 ++++++++++++++++
 gnu/packages/syndication.scm  |  4 ++--
 gnu/packages/text-editors.scm |  2 +-
 3 files changed, 19 insertions(+), 3 deletions(-)

diff --git a/gnu/packages/gnome.scm b/gnu/packages/gnome.scm
index 6fe8d2ee449b26e933884dd88cba848fac4827bc..4934ade3dd357f32265bd2a81abaeb0f20faf163 100644
--- a/gnu/packages/gnome.scm
+++ b/gnu/packages/gnome.scm
@@ -3320,6 +3320,22 @@ compiles to GTKBuilder XML.")
     (home-page "https://gitlab.gnome.org/jwestman/blueprint-compiler")
     (license license:lgpl3+)))
 
+(define-public blueprint-compiler-0.4
+  (package
+    (inherit blueprint-compiler)
+    (name "blueprint-compiler")
+    (version "0.4.0")
+    (source (origin
+              (method git-fetch)
+              (uri (git-reference
+                    (url
+                     "https://gitlab.gnome.org/jwestman/blueprint-compiler")
+                    (commit (string-append "v" version))))
+              (file-name (string-append name "-" version "-checkout"))
+              (sha256
+               (base32
+                "0hj7f4xhwjc4x32r3lswwclbw37fw3spy806g4plkmym25hz4ydy"))))))
+
 (define-public cambalache
   (package
     (name "cambalache")
diff --git a/gnu/packages/syndication.scm b/gnu/packages/syndication.scm
index 7d9a27bbc3c58bea06e31ff3366c172dc1c1b0f0..18d3df5b6ee9722ba35453a9ffc0c3c77fe822e3 100644
--- a/gnu/packages/syndication.scm
+++ b/gnu/packages/syndication.scm
@@ -201,7 +201,7 @@ cards.")
            (list gtk "bin")
            pkg-config))
     (inputs
-     (list blueprint-compiler
+     (list blueprint-compiler-0.4
            glib
            gtk
            gtksourceview
@@ -569,7 +569,7 @@ parser.  It is \"not fit for use at this point\", but gfeeds uses it anyway.")
                 `("XDG_DATA_DIRS" ":" prefix (,(getenv "XDG_DATA_DIRS")))))))))
     (native-inputs
      (list `(,glib "bin")
-           blueprint-compiler
+           blueprint-compiler-0.4
            gobject-introspection
            gettext-minimal
            pkg-config))
diff --git a/gnu/packages/text-editors.scm b/gnu/packages/text-editors.scm
index 8fd915bc56c7a4fd85896943d436238f675401dd..b62efabe6e72fe9164f4a1552b43c954d486ca75 100644
--- a/gnu/packages/text-editors.scm
+++ b/gnu/packages/text-editors.scm
@@ -1065,7 +1065,7 @@ Octave.  TeXmacs is completely extensible via Guile.")
     (build-system meson-build-system)
     (native-inputs
      (list appstream-glib
-           blueprint-compiler
+           blueprint-compiler-0.4
            desktop-file-utils
            gettext-minimal
            `(,glib "bin")