[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
02/03: gnu: delft-icon-theme: Use the copy-build-system.
From: |
guix-commits |
Subject: |
02/03: gnu: delft-icon-theme: Use the copy-build-system. |
Date: |
Fri, 28 Feb 2020 03:40:33 -0500 (EST) |
ambrevar pushed a commit to branch master
in repository guix.
commit 3282137d0e4a32cd1c6b049e6ce7c44ab65bfdff
Author: Leo Prikler <address@hidden>
AuthorDate: Fri Feb 21 17:17:56 2020 +0100
gnu: delft-icon-theme: Use the copy-build-system.
* gnu/packages/gnome-xyz.scm (delft-icon-theme): Use the copy-build-system.
Signed-off-by: Pierre Neidhardt <address@hidden>
---
gnu/packages/gnome-xyz.scm | 22 ++++++++++------------
1 file changed, 10 insertions(+), 12 deletions(-)
diff --git a/gnu/packages/gnome-xyz.scm b/gnu/packages/gnome-xyz.scm
index bedaacf..b0bc35c 100644
--- a/gnu/packages/gnome-xyz.scm
+++ b/gnu/packages/gnome-xyz.scm
@@ -101,19 +101,17 @@ like Gnome, Unity, Budgie, Pantheon, XFCE, Mate and
others.")
(base32
"0vw3yw9f9ygzfd2k3zrfih3r0vkzlhk1bmsk8sapvk7np24i1z9s"))
(file-name (git-file-name name version))))
- (build-system trivial-build-system)
+ (build-system copy-build-system)
(arguments
- `(#:modules ((guix build utils))
- #:builder
- (begin
- (use-modules (guix build utils))
- (copy-recursively (assoc-ref %build-inputs "source") "icons")
- (substitute* "icons/Delft/index.theme"
- (("gnome") "Adwaita"))
- (delete-file "icons/README.md")
- (delete-file "icons/LICENSE")
- (delete-file "icons/logo.jpg")
- (copy-recursively "icons" (string-append %output "/share/icons")))))
+ `(#:install-plan
+ `(("." "share/icons" #:exclude ("README.md" "LICENSE" "logo.jpg")))
+ #:phases
+ (modify-phases %standard-phases
+ (add-after 'unpack 'patch-index.theme
+ (lambda _
+ (substitute* "Delft/index.theme"
+ (("gnome") "Adwaita"))
+ #t)))))
(home-page "https://www.gnome-look.org/p/1199881/")
(synopsis "Continuation of Faenza icon theme with up to date app icons")
(description "Delft is a fork of the popular icon theme Faenza with up to