diff mbox series

[bug#46520] gnu: bpytop: Add phase to install themes.

Message ID 20210214215037.24561-1-mike@rohleder.de
State Accepted
Headers show
Series [bug#46520] gnu: bpytop: Add phase to install themes. | expand

Checks

Context Check Description
cbaines/submitting builds success
cbaines/comparison success View comparision
cbaines/git branch success View Git branch
cbaines/applying patch success View Laminar job
cbaines/issue success View issue

Commit Message

Michael Rohleder Feb. 14, 2021, 9:50 p.m. UTC
* gnu/packages/admin.scm (bpytop)[arguments]: Add install-themes phase.

Reported by bdju in #guix.
---
 gnu/packages/admin.scm | 14 +++++++++++++-
 1 file changed, 13 insertions(+), 1 deletion(-)

Comments

宋文武 Feb. 15, 2021, 12:51 a.m. UTC | #1
Michael Rohleder <mike@rohleder.de> writes:

> * gnu/packages/admin.scm (bpytop)[arguments]: Add install-themes phase.
>
> Reported by bdju in #guix.
> ---
>  gnu/packages/admin.scm | 14 +++++++++++++-
>  1 file changed, 13 insertions(+), 1 deletion(-)
>

Pushed, thank you!
diff mbox series

Patch

diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm
index 8dc6a4f303..71595750f2 100644
--- a/gnu/packages/admin.scm
+++ b/gnu/packages/admin.scm
@@ -32,7 +32,7 @@ 
 ;;; Copyright © 2019, 2020 Mathieu Othacehe <m.othacehe@gmail.com>
 ;;; Copyright © 2020 Oleg Pykhalov <go.wigust@gmail.com>
 ;;; Copyright © 2020 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
-;;; Copyright © 2020 Michael Rohleder <mike@rohleder.de>
+;;; Copyright © 2020, 2021 Michael Rohleder <mike@rohleder.de>
 ;;; Copyright © 2020 Vincent Legoll <vincent.legoll@gmail.com>
 ;;; Copyright © 2020 Morgan Smith <Morgan.J.Smith@outlook.com>
 ;;; Copyright © 2021 Zheng Junjie <873216071@qq.com>
@@ -591,6 +591,18 @@  memory, disks, network and processes.")
     (build-system python-build-system)
     (inputs
      `(("python-psutil" ,python-psutil)))
+    (arguments
+     `(#:phases
+       (modify-phases %standard-phases
+         (add-after 'install 'install-themes
+           (lambda* (#:key outputs #:allow-other-keys)
+             (let ((themes (string-append (assoc-ref outputs "out")
+                                          "/lib/python"
+                                          ,(version-major+minor
+                                            (package-version python))
+                                          "/site-packages/bpytop-themes")))
+               (mkdir-p themes)
+               (copy-recursively "bpytop-themes" themes)))))))
     (home-page
      "https://github.com/aristocratos/bpytop")
     (synopsis "Resource monitor")