From 1ea14a09d76e7be1eda9282dafb6ea57b18eae74 Mon Sep 17 00:00:00 2001
From: Raghav Gururajan <raghavgururajan@disroot.org>
Date: Sat, 23 Nov 2019 11:11:29 -0500
Subject: [PATCH 1/2] Add gnome-contacts.

---
 gnu/packages/gnome.scm | 51 ++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 51 insertions(+)

diff --git a/gnu/packages/gnome.scm b/gnu/packages/gnome.scm
index cd881b5b87..bbec7eabca 100644
--- a/gnu/packages/gnome.scm
+++ b/gnu/packages/gnome.scm
@@ -42,6 +42,7 @@
 ;;; Copyright © 2019 Maxim Cournoyer <maxim.cournoyer@gmail.com>
 ;;; Copyright © 2019 Martin Becze <mjbecze@riseup.net>
 ;;; Copyright © 2019 David Wilson <david@daviwil.com>
+;;; Copyright © 2019 Raghav Gururajan <raghavgururajan@disroot.org>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -468,6 +469,56 @@ can be used to configure a source directory checked out from Git and some
 commonly used macros.")
     (license license:gpl2+)))
 
+(define-public gnome-contacts
+  (package
+    (name "gnome-contacts")
+    (version "3.30.2")
+    (source (origin
+	      (method url-fetch)
+	      (uri (string-append "mirror://gnome/sources/" name "/"
+				  (version-major+minor version) "/"
+				  name "-" version ".tar.xz"))
+	      (sha256
+	       (base32 
+		"1b0pkdwz9yqcv82zzdf76rs2w3wa5zli8pka09wnahikx1ykk43h"))))
+    (build-system meson-build-system)
+    (arguments
+      `(#:phases
+        (modify-phases %standard-phases
+          (add-after 'unpack 'generate-vapis
+            (lambda* (#:key inputs #:allow-other-keys)
+              (invoke "vapigen" "--directory=vapi" "--pkg=gio-2.0"
+                      "--library=goa-1.0"
+                      (string-append (assoc-ref inputs "gnome-online-accounts:lib")
+                                     "/share/gir-1.0/Goa-1.0.gir"))
+              #t)))))
+    (native-inputs
+     `(("pkg-config" ,pkg-config)
+       ("vala" ,vala)
+       ("glib:bin" ,glib "bin")
+       ("gobject-introspection" ,gobject-introspection)
+       ("libgee" ,libgee)
+       ("evolution-data-server" ,evolution-data-server)
+       ("gnome-desktop" ,gnome-desktop)
+       ("gnome-online-accounts:lib" ,gnome-online-accounts "lib")
+       ("cheese" ,cheese)
+       ("gst-plugins-base" ,gst-plugins-base)
+       ("telepathy-glib" ,telepathy-glib)
+       ("gettext" ,gettext-minimal)
+       ("libxslt" ,libxslt)
+       ("docbook-xml" ,docbook-xml)
+       ("dockbook-xsl" ,docbook-xsl)
+       ("gtk+" ,gtk+)
+       ("gtk+:bin" ,gtk+ "bin")))
+    (propagated-inputs
+     `(("folks", folks)
+       ("telepathy-mission-control" ,telepathy-mission-control)))
+    (synopsis "Contacts is GNOME's integrated address book.")
+    (description "It is written in Vala and uses 
+		 libfolks (also written in Vala) and Evolution Data Server.")
+    (home-page "https://wiki.gnome.org/Apps/Contacts")
+    (license gpl2))
+
 (define-public gnome-desktop
   (package
     (name "gnome-desktop")
-- 
2.24.0