gnu: gnome-characters: Wrap program to provide the necessary Typelib files.

* gnu/packages/gnome.scm (gnome-characters)[arguments]: Add #:phases
with a 'wrap' phase.
[inputs]: Add GNOME-DESKTOP.

Co-authored-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
kanichos@yandex.ru 2020-01-01 13:59:49 +03:00 committed by Ludovic Courtès
parent 562b4e47cd
commit 5757c641f2
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5

View file

@ -548,7 +548,18 @@ (define-public gnome-characters
(base32
"08cwz39iwgsyyb2wqhb8vfbmh1cwfkgfiy7adp08w7rwqi99x3dp"))))
(build-system meson-build-system)
(arguments '(#:glib-or-gtk? #t))
(arguments
`(#:glib-or-gtk? #t
#:phases (modify-phases %standard-phases
(add-after 'install 'wrap
(lambda* (#:key outputs #:allow-other-keys)
;; GNOME Characters needs Typelib files from GTK and
;; gnome-desktop.
(wrap-program (string-append (assoc-ref outputs "out")
"/bin/gnome-characters")
`("GI_TYPELIB_PATH" ":" prefix
(,(getenv "GI_TYPELIB_PATH"))))
#t)))))
(native-inputs
`(("gettext" ,gettext-minimal)
("glib:bin" ,glib "bin")
@ -558,7 +569,8 @@ (define-public gnome-characters
(inputs
`(("gjs" ,gjs)
("gtk+" ,gtk+)
("libunistring" ,libunistring)))
("libunistring" ,libunistring)
("gnome-desktop" ,gnome-desktop)))
(home-page "https://wiki.gnome.org/Apps/CharacterMap")
(synopsis "Find and insert unusual characters")
(description "Characters is a simple utility application to find