diff options
Diffstat (limited to 'gnu/packages/gnome-xyz.scm')
-rw-r--r-- | gnu/packages/gnome-xyz.scm | 203 |
1 files changed, 189 insertions, 14 deletions
diff --git a/gnu/packages/gnome-xyz.scm b/gnu/packages/gnome-xyz.scm index 8161db557d..17c6bd78e8 100644 --- a/gnu/packages/gnome-xyz.scm +++ b/gnu/packages/gnome-xyz.scm @@ -14,6 +14,8 @@ ;;; Copyright © 2021 Guillaume Le Vaillant <glv@posteo.net> ;;; Copyright © 2021 Songlin Jiang <hollowman@hollowman.ml> ;;; Copyright © 2021 Justin Veilleux <terramorpha@cock.li> +;;; Copyright © 2021 Attila Lendvai <attila@lendvai.name> +;;; Copyright © 2021 Charles Jackson <charles.b.jackson@protonmail.com> ;;; ;;; This file is part of GNU Guix. ;;; @@ -35,13 +37,16 @@ #:use-module (guix build-system gnu) #:use-module (guix build-system copy) #:use-module (guix build-system meson) + #:use-module (guix gexp) #:use-module (guix git-download) #:use-module (guix packages) #:use-module (guix utils) #:use-module ((guix licenses) #:prefix license:) + #:use-module (gnu packages) #:use-module (gnu packages acl) #:use-module (gnu packages attr) #:use-module (gnu packages autotools) + #:use-module (gnu packages backup) #:use-module (gnu packages base) #:use-module (gnu packages bash) #:use-module (gnu packages build-tools) @@ -241,26 +246,29 @@ GNOME Shell.") (define-public gnome-shell-extension-clipboard-indicator (package (name "gnome-shell-extension-clipboard-indicator") - (version "34") + (version "39") (source (origin (method git-fetch) (uri (git-reference - (url (string-append "https://github.com/Tudmotu/" - "gnome-shell-extension-clipboard-indicator.git")) + (url + (string-append + "https://github.com/Tudmotu/" + "gnome-shell-extension-clipboard-indicator")) (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 (base32 - "0i00psc1ky70zljd14jzr627y7nd8xwnwrh4xpajl1f6djabh12s")) + "1kq6bzxki7lwmw690f4qml8pvfwafpqpsfnq2kyjhrp8nh39axwi")) (modules '((guix build utils))) (snippet ;; Remove pre-compiled settings schemas and translations from ;; source, as they are generated as part of build. Upstream ;; includes them for people who want to run the software ;; directly from source tree. - '(begin (delete-file "schemas/gschemas.compiled") - (for-each delete-file (find-files "locale" "\\.mo$")) - #t)))) + '(begin + (delete-file "schemas/gschemas.compiled") + (for-each delete-file + (find-files "locale" "\\.mo$")))))) (build-system copy-build-system) (arguments '(#:install-plan @@ -271,14 +279,9 @@ GNOME Shell.") (add-before 'install 'compile-schemas (lambda _ (with-directory-excursion "schemas" - (invoke "glib-compile-schemas" ".")) - #t)) - (add-before 'install 'compile-locales - (lambda _ (invoke "./compile-locales.sh") - #t))))) + (invoke "glib-compile-schemas" "."))))))) (native-inputs - `(("gettext" ,gettext-minimal) - ("glib:bin" ,glib "bin"))) ; for glib-compile-schemas + (list `(,glib "bin") gettext-minimal)) (home-page "https://github.com/Tudmotu/gnome-shell-extension-clipboard-indicator") (synopsis "Clipboard manager extension for GNOME Shell") (description "Clipboard Indicator is a clipboard manager for GNOME Shell @@ -686,6 +689,178 @@ scrollable tiling of windows and per monitor workspaces. It's inspired by paper notebooks and tiling window managers.") (license license:gpl3))) +(define-public gpaste + (package + (name "gpaste") + (version "3.42.2") + (source (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/Keruspe/GPaste") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "1k5qvgzwl357k72qfim5zfas2a0n6j24jnlm1v472l7h6gb6lssm")) + (patches + (search-patches "gpaste-fix-paths.patch")))) + (build-system meson-build-system) + (native-inputs + (list autoconf automake gettext-minimal gobject-introspection + (list glib "bin") ; for glib-compile-resources + libtool pkg-config vala)) + (inputs + (list appstream-glib libarchive gjs mutter graphene)) + (arguments + (list #:meson meson-0.59 ;positional arguments error with meson 0.60 + #:glib-or-gtk? #true + #:configure-flags + #~(list + (string-append "-Dcontrol-center-keybindings-dir=" + #$output "/share/gnome-control-center/keybindings") + (string-append "-Ddbus-services-dir=" + #$output "/share/dbus-1/services") + (string-append "-Dsystemd-user-unit-dir=" + #$output "/etc/systemd/user")) + #:phases + #~(modify-phases %standard-phases + (add-after 'unpack 'fix-introspection-install-dir + (lambda* (#:key outputs #:allow-other-keys) + (let ((out (assoc-ref outputs "out"))) + (substitute* '("src/gnome-shell/extension.js" + "src/gnome-shell/prefs.js") + (("@typelibPath@") + (string-append out "/lib/girepository-1.0/"))))))))) + (home-page "https://github.com/Keruspe/GPaste") + (synopsis "Clipboard management system for GNOME Shell") + (description "GPaste is a clipboard manager, a tool which allows you to +keep a trace of what you’re copying and pasting. Is is really useful when +you go through tons of documentation and you want to keep around a bunch of +functions you might want to use, for example. The clipboard manager will +store an history of everything you do, so that you can get back to older +copies you now want to paste.") + (license license:bsd-2))) + +(define-public gnome-shell-extension-vertical-overview + (package + (name "gnome-shell-extension-vertical-overview") + (version "8") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/RensAlthuis/vertical-overview") + (commit (string-append "v" version)))) + (sha256 + (base32 + "01vz48p3bh7p3ybdyw0s0ahs18lk2kzk9x4ad46s0dnwmmsyhww9")) + (file-name (git-file-name name version)) + (snippet + '(begin (delete-file "schemas/gschemas.compiled"))))) + (build-system copy-build-system) + (arguments + `(#:install-plan + '(("." ,(string-append + "share/gnome-shell/extensions/" + "vertical-overview@RensAlthuis.github.com") + #:include-regexp ("\\.js(on)?$" "\\.css$" "\\.ui$" "\\.png$" + "\\.xml$" "\\.compiled$"))) + #:phases + (modify-phases %standard-phases + (add-before 'install 'compile-schemas + (lambda _ + (with-directory-excursion "schemas" + (invoke "glib-compile-schemas" "."))))))) + (native-inputs + (list `(,glib "bin"))) ; for glib-compile-resources + (home-page "https://github.com/RensAlthuis/vertical-overview") + (synopsis "Provides a vertical overview in Gnome 40 and upper") + (description "This Gnome extension replaces the new horizontally oriented +Gnome overview with something that resembles the old vertically oriented +style.") + (license license:gpl3))) + +(define-public gnome-shell-extension-jiggle + (package + (name "gnome-shell-extension-jiggle") + (version "8") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/jeffchannell/jiggle/") + (commit version))) + (sha256 + (base32 + "1wbdx2bp22bdwj51ckgivwglkmckr7z8kfwvc8nv4y376hjz5jxz")) + (file-name (git-file-name name version)) + (snippet + '(begin (delete-file "schemas/gschemas.compiled"))))) + (build-system copy-build-system) + (arguments + `(#:install-plan + '(("." ,(string-append + "share/gnome-shell/extensions/" + "jiggle@jeffchannell.com") + #:include-regexp ("\\.js(on)?$" "\\.css$" "\\.ui$" "\\.png$" + "\\.xml$" "\\.compiled$"))) + #:phases + (modify-phases %standard-phases + (add-after 'unpack 'fix-version + (lambda _ + (substitute* "metadata.json" + (("\"40.0\"") "\"40\", \"41\"")))) + (add-before 'install 'compile-schemas + (lambda _ + (with-directory-excursion "schemas" + (invoke "glib-compile-schemas" "."))))))) + (native-inputs + (list `(,glib "bin"))) ; for glib-compile-resources + (home-page "https://github.com/jeffchannell/jiggle") + (synopsis "Mouse cursor enlargement for small and fast movements") + (description "Jiggle is a Gnome Shell extension that highlights the cursor +position when the mouse is moved rapidly.") + (license license:gpl2))) + +(define-public gnome-shell-extension-burn-my-windows + (package + (name "gnome-shell-extension-burn-my-windows") + (version "7") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/Schneegans/Burn-My-Windows/") + (commit (string-append "v" version)))) + (sha256 + (base32 + "1513kh6dfvnaj5jq2mm7rv1k54v91hjckgim1dpqlxwnv4gi9krd")) + (file-name (git-file-name name version)))) + (build-system copy-build-system) + (arguments + `(#:install-plan + '(("." ,(string-append + "share/gnome-shell/extensions/" + "burn-my-windows@schneegans.github.com") + #:include-regexp ("\\.js(on)?$" "\\.css$" "\\.ui$" "\\.png$" + "\\.xml$" "\\.compiled$" "\\.gresource$"))) + #:phases + (modify-phases %standard-phases + (add-before 'install 'compile-resources + (lambda _ + (invoke "make" "resources/burn-my-windows.gresource"))) + (add-before 'install 'compile-schemas + (lambda _ + (with-directory-excursion "schemas" + (invoke "glib-compile-schemas" "."))))))) + (native-inputs + (list `(,glib "bin"))) ; for glib-compile-resources + (home-page "https://github.com/Schneegans/Burn-My-Windows") + (synopsis "Application closing effects extension") + (description "Burn My Windows is a shell extension that stylizes the +animation of closing windowed applications.") + (license license:gpl3))) + (define-public arc-theme (package (name "arc-theme") |