From b75cdc7e3a4be37360e058f05f0db1563d982f26 Mon Sep 17 00:00:00 2001 From: Charles Date: Tue, 11 Jan 2022 15:26:38 -0600 Subject: [PATCH 3/4] gnu: gnome-xyz: Add gnome-shell-extension-burn-my-windows. * gnu/packages/gnome-xyz.scm (gnome-shell-extension-burn-my-windows): New Variable. --- gnu/packages/gnome-xyz.scm | 40 ++++++++++++++++++++++++++++++++++++++ 1 file changed, 40 insertions(+) diff --git a/gnu/packages/gnome-xyz.scm b/gnu/packages/gnome-xyz.scm index 8772ef65db..9a8f1e3bd5 100644 --- a/gnu/packages/gnome-xyz.scm +++ b/gnu/packages/gnome-xyz.scm @@ -767,6 +767,46 @@ (define-public gnome-shell-extension-jiggle 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")))) + (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") + #t)) + (add-before 'install 'compile-schemas + (lambda _ + (with-directory-excursion "schemas" + (invoke "glib-compile-schemas" ".")) + #t))))) + (native-inputs + `(("glib:bin" ,glib "bin"))) ; for glib-compile-schemas + (home-page "https://github.com/Schneegans/Burn-My-Windows") + (synopsis "Disintegrate your apps with style") + (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") -- 2.34.0