gnu: mcomix: Install messages.

* gnu/packages/image-viewer.scm (mcomix)[install-data]: Also install messages
subdirectory.
This commit is contained in:
Liliana Marie Prikler 2022-03-27 09:49:02 +02:00
parent 943d4b775b
commit 2344fb1097
No known key found for this signature in database
GPG key ID: 442A84B8C70E2F87

View file

@ -697,13 +697,18 @@ (define-public mcomix
"if name in supported_formats_gdk: continue")))) "if name in supported_formats_gdk: continue"))))
(add-after 'install 'install-data (add-after 'install 'install-data
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(copy-recursively (with-directory-excursion "mcomix"
"mcomix/images" (for-each
(string-append (assoc-ref outputs "out") (lambda (subdir)
"/lib/python" (copy-recursively
#$(version-major+minor subdir
(package-version (this-package-input "python"))) (string-append
"/site-packages/mcomix/images")))) (assoc-ref outputs "out")
"/lib/python"
#$(version-major+minor
(package-version (this-package-input "python")))
"/site-packages/mcomix/" subdir)))
'("images" "messages")))))
(add-after 'glib-or-gtk-compile-schemas 'glib-or-gtk-wrap (add-after 'glib-or-gtk-compile-schemas 'glib-or-gtk-wrap
(assoc-ref glib-or-gtk:%standard-phases 'glib-or-gtk-wrap)) (assoc-ref glib-or-gtk:%standard-phases 'glib-or-gtk-wrap))
(add-after 'wrap 'gi-wrap (add-after 'wrap 'gi-wrap