[bug#38952] gnu: Add gnome-boxes.

["Raghav Gururajan" <raghavgururajan@disroot.org>]

[-- Attachment #1: Type: text/plain, Size: 147 bytes --]

Hello Guix!

Please find the attached patch to add gnome-boxes.

NOTE: This patch depends on the patch #38951.

Thank you!

Regards,
RG.

[-- Attachment #2: gnome-boxes.patch --]
[-- Type: application/octet-stream, Size: 2417 bytes --]

From 48b3b3e468b85bb7cf8dc5c4e5617203ea7b7a93 Mon Sep 17 00:00:00 2001
From: Raghav Gururajan <raghavgururajan@disroot.org>
Date: Sun, 5 Jan 2020 14:15:10 -0500
Subject: [PATCH] gnu: Add gnome-boxes.

* gnu/packages/gnome.scm (gnome-boxes): New variable.
---
 gnu/packages/gnome.scm | 47 ++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 47 insertions(+)

diff --git a/gnu/packages/gnome.scm b/gnu/packages/gnome.scm
index b0bd46f2da..2ffff4bcdb 100644
--- a/gnu/packages/gnome.scm
+++ b/gnu/packages/gnome.scm
@@ -275,6 +275,53 @@ features to enable users to create their discs easily and quickly.")
    (home-page "https://gitlab.gnome.org/GNOME/libgovirt")
    (license license:gpl2+)))
 
+(define-public gnome-boxes
+  (package
+   (name "gnome-boxes")
+   (version "3.32.2")
+   (source (origin
+            (method url-fetch)
+            (uri (string-append "mirror://gnome/sources/" name "/"
+                                (version-major+minor version) "/"
+                                name "-" version ".tar.xz"))
+            (sha256
+             (base32
+              "15g2w2hzh3945qcwfl3dyqnn5770lzg5cjwwzzj0lw9m98n4ljgn"))))
+   (build-system meson-build-system)
+   (arguments
+    `(#:validate-runpath? #f)) ; FIX-ME: runpath vaildation always fail.
+   (native-inputs
+    `(("gettext" ,gettext-minimal)
+      ("glib:bin" ,glib "bin")
+      ("gtk+:bin" ,gtk+ "bin")
+      ("pkg-config" ,pkg-config)))
+   (inputs
+    `(("adwaita-icon-theme" ,adwaita-icon-theme)
+      ("desktop-file-utils" ,desktop-file-utils)
+      ("freerdp" ,freerdp)
+      ("govirt" ,libgovirt)
+      ("gtk-vnc" ,gtk-vnc)
+      ("itstool" ,itstool)
+      ("json-glib" ,json-glib)
+      ("libarchive" ,libarchive)
+      ("libgudev" ,libgudev)
+      ("libosinfo" ,libosinfo)
+      ("libsecret" ,libsecret)
+      ("libusb" ,libusb)
+      ("libvirt-glib" ,libvirt-glib)
+      ("librest" ,rest)
+      ("spice-gtk" ,spice-gtk)
+      ("tracker" ,tracker)
+      ("tracker-miners" ,tracker-miners)
+      ("vala" ,vala)
+      ("vte" ,vte)
+      ("webkitgtk" ,webkitgtk)))
+   (synopsis "Virtualization for GNOME desktop")
+   (description "GNOME Boxes is a simple application to view, access,
+and manage remote and virtual systems.")
+   (home-page "https://wiki.gnome.org/Apps/Boxes")
+   (license license:gpl2)))
+
 (define-public gnome-weather
   (package
    (name "gnome-weather")
-- 
2.24.1