diff mbox series

[bug#65644,gnome-team,1/9] gnu: Add gcr 4.0.

Message ID e7265eecb913f7c7efb9b84ac028c00fcf5eeb9f.1693454927.git.liliana.prikler@gmail.com
State New
Headers show
Series Update GNOME Shell to 44 | expand

Commit Message

Liliana Marie Prikler Aug. 20, 2023, 7 a.m. UTC
* gnu/packages/gnome.scm (gcr-4): New variable.
---
 gnu/packages/gnome.scm | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)

Comments

Maxim Cournoyer Sept. 5, 2023, 2:53 a.m. UTC | #1
Hi,

Liliana Marie Prikler <liliana.prikler@gmail.com> writes:

> * gnu/packages/gnome.scm (gcr-4): New variable.

I guess we can't yet remove the older version?  By convention, 'gcr'
should point to the latest and greatest, so I'd make this one 'gcr', and
run a sed job that rewrites current gcr to gcr-3.

Maybe the inheritance relationship would better be reversed to ease
maintenance in the future.
diff mbox series

Patch

diff --git a/gnu/packages/gnome.scm b/gnu/packages/gnome.scm
index 922d6ba24b..b30e00365c 100644
--- a/gnu/packages/gnome.scm
+++ b/gnu/packages/gnome.scm
@@ -2445,6 +2445,30 @@  (define-public gcr
 GNOME Desktop.")
     (license license:lgpl2.1+)))
 
+(define-public gcr-4
+  (package
+    (inherit gcr)
+    (name "gcr")
+    (version "4.0.0")
+    (source (origin
+              (method url-fetch)
+              (uri (string-append "mirror://gnome/sources/" name "/"
+                                  (version-major+minor version)  "/"
+                                  name "-" version ".tar.xz"))
+              (sha256
+               (base32
+                "0z7cviri25qy2v042hw6x731bj1azpx8plrd7ssbmrqf9y95an64"))))
+    (arguments
+     (substitute-keyword-arguments (package-arguments gcr)
+       ((#:phases phases)
+        #~(modify-phases #$phases
+            (replace 'skip-gtk-update-icon-cache
+              (lambda _
+                (substitute* "meson.build"
+                  (("gtk_update_icon_cache: true")
+                   "gtk_update_icon_cache: false"))))))))
+    (propagated-inputs (list glib gtk p11-kit))))
+
 (define-public gdl
   (package
     (name "gdl")