gnu: bpytop: Add phase to install themes.

Reported by bdju in #guix.

* gnu/packages/admin.scm (bpytop)[arguments]: Add install-themes phase.

Signed-off-by: 宋文武 <iyzsong@member.fsf.org>
This commit is contained in:
Michael Rohleder 2021-02-14 22:50:37 +01:00 committed by 宋文武
parent 858898e348
commit 5b401ed050
No known key found for this signature in database
GPG key ID: D415BF253B515976

View file

@ -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 @@ (define-public bpytop
(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")