Archived
1
0
Fork 0

gnu: komikku: Use G-Expressions.

* gnu/packages/gnome.scm (komikku)[arguments]: Convert to list of G-Expressions.
This commit is contained in:
Liliana Marie Prikler 2022-10-01 17:53:25 +02:00
parent 7f0ff90538
commit 46e1eb48c9
No known key found for this signature in database
GPG key ID: 442A84B8C70E2F87

View file

@ -13023,25 +13023,26 @@ profiler via Sysprof, debugging support, and more.")
"17r059srxrx26w40swy47pdpyigyjdczp8550g4rfh86qs3ld4il")))) "17r059srxrx26w40swy47pdpyigyjdczp8550g4rfh86qs3ld4il"))))
(build-system meson-build-system) (build-system meson-build-system)
(arguments (arguments
`(#:glib-or-gtk? #t (list
#:phases #:glib-or-gtk? #t
(modify-phases %standard-phases #:phases
(add-after 'unpack 'patch-sources #~(modify-phases %standard-phases
(lambda _ (add-after 'unpack 'patch-sources
(substitute* "komikku/utils.py" (lambda _
(("from komikku\\.servers import get_servers_list") (substitute* "komikku/utils.py"
;; code following that line should migrate old databases (("from komikku\\.servers import get_servers_list")
;; but the line itself results in an import error ;; code following that line should migrate old databases
"return data_dir_path")))) ;; but the line itself results in an import error
(add-after 'unpack 'skip-gtk-update-icon-cache "return data_dir_path"))))
(lambda _ (add-after 'unpack 'skip-gtk-update-icon-cache
(substitute* "meson_post_install.py" (lambda _
(("gtk-update-icon-cache") (which "true"))))) (substitute* "meson_post_install.py"
(add-after 'glib-or-gtk-wrap 'python-and-gi-wrap (("gtk-update-icon-cache") (which "true")))))
(lambda* (#:key outputs #:allow-other-keys) (add-after 'glib-or-gtk-wrap 'python-and-gi-wrap
(wrap-program (search-input-file outputs "bin/komikku") (lambda* (#:key outputs #:allow-other-keys)
`("GUIX_PYTHONPATH" = (,(getenv "GUIX_PYTHONPATH"))) (wrap-program (search-input-file outputs "bin/komikku")
`("GI_TYPELIB_PATH" = (,(getenv "GI_TYPELIB_PATH"))))))))) `("GUIX_PYTHONPATH" = (,(getenv "GUIX_PYTHONPATH")))
`("GI_TYPELIB_PATH" = (,(getenv "GI_TYPELIB_PATH")))))))))
(inputs (inputs
(list bash-minimal (list bash-minimal
gtk+ gtk+