From: Liliana Marie Prikler <liliana.prikler@gmail.com>
To: 54558@debbugs.gnu.org
Cc: batalie@riseup.net
Subject: bug#54558: [PATCH 2/2] gnu: mcomix: Wrap missing paths.
Date: Fri, 25 Mar 2022 23:45:51 +0100 [thread overview]
Message-ID: <f2b3eaae0e87055c00c381a6949ecc9147ed1585.camel@gmail.com> (raw)
In-Reply-To: <cfe693ad89b345d867360e4d6b7dff82@riseup.net>
* gnu/packages/image-viewers.scm (mcomix)[inputs]: Add gtk+.
[arguments]<#:imported-modules,#:modules>: New arguments.
<#:phases>: Add ‘glib-or-gtk-wrap’ and ‘gi-wrap’.
---
gnu/packages/image-viewers.scm | 19 +++++++++++++++++--
1 file changed, 17 insertions(+), 2 deletions(-)
diff --git a/gnu/packages/image-viewers.scm b/gnu/packages/image-viewers.scm
index 1c325cd8a7..134ffc563a 100644
--- a/gnu/packages/image-viewers.scm
+++ b/gnu/packages/image-viewers.scm
@@ -675,9 +675,14 @@ (define-public mcomix
"187ca815vxb2in1ryvfiaf1zapi0bc9jxdac3c1bky0kr6x7xyap"))))
(build-system python-build-system)
(inputs
- (list p7zip python python-pillow python-pygobject python-pycairo))
+ (list p7zip python python-pillow python-pygobject python-pycairo gtk+))
(arguments
(list
+ #:imported-modules `(,@%python-build-system-modules
+ (guix build glib-or-gtk-build-system))
+ #:modules '((guix build python-build-system)
+ ((guix build glib-or-gtk-build-system) #:prefix glib-or-gtk:)
+ (guix build utils))
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'patch-source
@@ -699,7 +704,17 @@ (define-public mcomix
"/lib/python"
#$(version-major+minor
(package-version (this-package-input "python")))
- "/site-packages/mcomix/images")))))))
+ "/site-packages/mcomix/images"))))
+ (add-after 'glib-or-gtk-compile-schemas 'glib-or-gtk-wrap
+ (assoc-ref glib-or-gtk:%standard-phases 'glib-or-gtk-wrap))
+ (add-after 'wrap 'gi-wrap
+ (lambda* (#:key outputs #:allow-other-keys)
+ (let ((bin (string-append (assoc-ref outputs "out") "/bin")))
+ (for-each
+ (lambda (prog)
+ (wrap-program prog
+ `("GI_TYPELIB_PATH" = (,(getenv "GI_TYPELIB_PATH")))))
+ (list (string-append bin "/mcomix")))))))))
(home-page "https://sourceforge.net/p/mcomix/wiki/Home/")
(synopsis "Image viewer for comics")
(description "MComix is a customizable image viewer that specializes as
--
2.34.0
next prev parent reply other threads:[~2022-03-25 22:49 UTC|newest]
Thread overview: 8+ messages / expand[flat|nested] mbox.gz Atom feed top
2022-03-24 20:08 bug#54558: mcomix refuses to run, missing GTK libraries Natalie
2022-03-25 20:37 ` bug#54558: [PATCH 1/2] gnu: mcomix: Update to 2.0.1 Liliana Marie Prikler
2022-03-26 2:57 ` bug#54558: mcomix refuses to run, missing GTK libraries Maxim Cournoyer
2022-03-26 8:01 ` Liliana Marie Prikler
2022-03-25 22:45 ` Liliana Marie Prikler [this message]
2022-03-27 2:26 ` bug#54558: Mcomix 2.0.1 do not install locale data Feng Shu
2022-03-27 9:39 ` Feng Shu
2022-03-27 9:52 ` Feng Shu
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://guix.gnu.org/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=f2b3eaae0e87055c00c381a6949ecc9147ed1585.camel@gmail.com \
--to=liliana.prikler@gmail.com \
--cc=54558@debbugs.gnu.org \
--cc=batalie@riseup.net \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/guix.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).