From 104cf686c091fc02584ddb041771831e6e2d81bf Mon Sep 17 00:00:00 2001
From: Alex Griffin <a@ajgrf.com>
Date: Fri, 21 Feb 2020 16:25:27 -0600
Subject: [PATCH] gnu: Add gnome-shell-extension-gsconnect.
* gnu/packages/gnome-xyz.scm (gnome-shell-extension-gsconnect): New variable.
---
gnu/packages/gnome-xyz.scm | 99 ++++++++++++++++++++++++++++++++++++++
1 file changed, 99 insertions(+)
@@ -24,15 +24,20 @@
#:use-module (guix build-system trivial)
#:use-module (guix build-system gnu)
#:use-module (guix build-system copy)
+ #:use-module (guix build-system meson)
#:use-module (guix git-download)
#:use-module (guix packages)
#:use-module ((guix licenses) #:prefix license:)
#:use-module (gnu packages base)
#:use-module (gnu packages bash)
+ #:use-module (gnu packages gettext)
#:use-module (gnu packages glib)
#:use-module (gnu packages gnome)
#:use-module (gnu packages gtk)
#:use-module (gnu packages pkg-config)
+ #:use-module (gnu packages python-xyz)
+ #:use-module (gnu packages ssh)
+ #:use-module (gnu packages tls)
#:use-module (gnu packages ruby)
#:use-module (gnu packages xml))
@@ -188,6 +193,100 @@ faster window switching.")
(home-page "https://micheleg.github.io/dash-to-dock/")
(license license:gpl2+)))
+(define-public gnome-shell-extension-gsconnect
+ (package
+ (name "gnome-shell-extension-gsconnect")
+ ;; v28 is the last version to support GNOME 3.32
+ (version "28")
+ (source (origin
+ (method git-fetch)
+ (uri (git-reference
+ (url (string-append "https://github.com/andyholmes"
+ "/gnome-shell-extension-gsconnect.git"))
+ (commit (string-append "v" version))))
+ (file-name (git-file-name name version))
+ (sha256
+ (base32
+ "0grqkzqm7mlkbzin4nx9w7bh5cgygph8pn0cvim4a4gg99nfcp5z"))))
+ (build-system meson-build-system)
+ (arguments
+ `(#:configure-flags
+ (let* ((out (assoc-ref %outputs "out"))
+ (name+version (strip-store-file-name out))
+ (gschema-dir (string-append out
+ "/share/gsettings-schemas/"
+ name+version
+ "/glib-2.0/schemas"))
+ (gnome-shell (assoc-ref %build-inputs "gnome-shell"))
+ (openssh (assoc-ref %build-inputs "openssh"))
+ (openssl (assoc-ref %build-inputs "openssl")))
+ (list
+ (string-append "-Dgnome_shell_libdir=" gnome-shell "/lib")
+ (string-append "-Dgsettings_schemadir=" gschema-dir)
+ (string-append "-Dopenssl_path=" openssl "/bin/openssl")
+ (string-append "-Dsshadd_path=" openssh "/bin/ssh-add")
+ (string-append "-Dsshkeygen_path=" openssh "/bin/ssh-keygen")
+ (string-append "-Dsession_bus_services_dir=" out "/share/dbus-1/services")
+ "-Dpost_install=true"))
+ #:phases
+ (modify-phases %standard-phases
+ (add-before 'configure 'fix-paths
+ (lambda* (#:key inputs #:allow-other-keys)
+ (let* ((glib (assoc-ref inputs "glib:bin"))
+ (gapplication (string-append glib "/bin/gapplication"))
+ (gi-typelib-path (getenv "GI_TYPELIB_PATH")))
+ (substitute* "data/org.gnome.Shell.Extensions.GSConnect.desktop"
+ (("gapplication") gapplication))
+ (for-each
+ (lambda (file)
+ (substitute* file
+ (("'use strict';")
+ (string-append "'use strict';\n\n"
+ "'" gi-typelib-path "'.split(':').forEach("
+ "path => imports.gi.GIRepository.Repository."
+ "prepend_search_path(path));"))))
+ '("src/extension.js" "src/prefs.js"))
+ #t)))
+ (add-after 'install 'wrap-daemons
+ (lambda* (#:key inputs outputs #:allow-other-keys)
+ (let* ((out (assoc-ref outputs "out"))
+ (service-dir
+ (string-append out "/share/gnome-shell/extensions"
+ "/gsconnect@andyholmes.github.io/service"))
+ (gi-typelib-path (getenv "GI_TYPELIB_PATH")))
+ (wrap-program (string-append service-dir "/daemon.js")
+ `("GI_TYPELIB_PATH" ":" prefix (,gi-typelib-path)))
+ #t))))))
+ (inputs
+ `(("at-spi2-core" ,at-spi2-core)
+ ("caribou" ,caribou)
+ ("evolution-data-server" ,evolution-data-server)
+ ("folks" ,folks)
+ ("gjs" ,gjs)
+ ("glib" ,glib)
+ ("glib:bin" ,glib "bin")
+ ("gsound" ,gsound)
+ ("gnome-shell" ,gnome-shell)
+ ("gtk+" ,gtk+)
+ ("nautilus" ,nautilus)
+ ("openssh" ,openssh)
+ ("openssl" ,openssl)
+ ("python-nautilus" ,python-nautilus)
+ ("python-pygobject" ,python-pygobject)
+ ("upower" ,upower)))
+ (native-inputs
+ `(("gettext" ,gettext-minimal)
+ ("gobject-introspection" ,gobject-introspection)
+ ("libxml2" ,libxml2)
+ ("pkg-config" ,pkg-config)))
+ (home-page "https://github.com/andyholmes/gnome-shell-extension-gsconnect/wiki")
+ (synopsis "Connect GNOME Shell with your Android phone")
+ (description "GSConnect is a complete implementation of KDE Connect
+especially for GNOME Shell, allowing devices to securely share content, like
+notifications or files, and other features like SMS messaging and remote
+control.")
+ (license license:gpl2)))
+
(define-public gnome-shell-extension-hide-app-icon
(let ((commit "4188aa5f4ba24901a053a0c3eb0d83baa8625eab")
(revision "0"))
--
2.25.0