From 93d9737d2b0dc3650b8b967b0bfdef86ea9ecee2 Mon Sep 17 00:00:00 2001 From: Kei Kebreau Date: Thu, 30 Jul 2020 23:21:45 -0400 Subject: gnu: wxwidgets: Fix MIME type loading. * gnu/packages/wxwidgets.scm (wxwidgets)[inputs]: Add shared-mime-info. [arguments]: Update 'refer-to-inputs phase so wxwidgets looks in the correct directory for MIME type information. --- gnu/packages/wxwidgets.scm | 16 +++++++++++----- 1 file changed, 11 insertions(+), 5 deletions(-) diff --git a/gnu/packages/wxwidgets.scm b/gnu/packages/wxwidgets.scm index 7141b2f4b8..f3a7fdd7a4 100644 --- a/gnu/packages/wxwidgets.scm +++ b/gnu/packages/wxwidgets.scm @@ -37,6 +37,7 @@ #:use-module (gnu packages databases) #:use-module (gnu packages freedesktop) #:use-module (gnu packages gl) + #:use-module (gnu packages gnome) #:use-module (gnu packages gstreamer) #:use-module (gnu packages gtk) #:use-module (gnu packages image) @@ -75,6 +76,7 @@ ("mesa" ,mesa) ("webkitgtk" ,webkitgtk) ("sdl" ,sdl) + ("shared-mime-info" ,shared-mime-info) ("xdg-utils" ,xdg-utils))) (native-inputs `(("pkg-config" ,pkg-config))) @@ -97,11 +99,15 @@ #:phases (modify-phases %standard-phases (add-after 'unpack 'refer-to-inputs - (lambda _ - (substitute* "src/unix/utilsx11.cpp" - (("wxExecute\\(xdg_open \\+") - (string-append "wxExecute(\"" (which "xdg-open") "\""))) - #t))))) + (lambda* (#:key inputs #:allow-other-keys) + (let* ((mime (string-append (assoc-ref inputs "shared-mime-info") + "/share/mime"))) + (substitute* "src/unix/utilsx11.cpp" + (("wxExecute\\(xdg_open \\+") + (string-append "wxExecute(\"" (which "xdg-open") "\""))) + (substitute* "src/unix/mimetype.cpp" + (("/usr(/local)?/share/mime") mime)) + #t)))))) (home-page "https://www.wxwidgets.org/") (synopsis "Widget toolkit for creating graphical user interfaces") (description -- cgit v1.2.3 c1236a3484f44d7afd82e37a0f'>README
AgeCommit message (Expand)Author
2020-06-02doc: Update README to refer to the manual....Ludovic Courtès
2019-11-09doc: Mention value /var to localstatedir option....zimoun
2019-09-04doc: Update 'README'....Ludovic Courtès
2019-01-09build: Require Guile 2.2....Ludovic Courtès
2018-12-02Make Guile-JSON a required dependency....Eric Bavier
2018-11-23Update Guile-SQLite3 URL everywhere....Ludovic Courtès
2018-09-04Switch to Guile-Gcrypt....Ludovic Courtès
2018-06-27doc: Specify Guile-SQLite3 minimum version....Ludovic Courtès
2018-06-14build: Require Guile-SQLite3....Ludovic Courtès
2018-02-26build: Require Guile >= 2.0.13....Ludovic Courtès
2018-01-07doc: Mark zlib as mandatory, libbz2 as optional....Ludovic Courtès
2018-01-01doc: Update requirements in 'README'....Mathieu Lirzin
2017-09-25README: Replace http:// with https:// where applicable.Marius Bakke
2017-03-18build: Require Guile >= 2.0.9....Ludovic Courtès
2017-01-30maint: Fix invalid calls to 'info'....Mathieu Lirzin
2015-10-06build: Automatically determine libgcrypt's file name....Ludovic Courtès
2015-06-14doc: Move most 'HACKING' informations into the manual....Mathieu Lirzin
2015-06-04Document 'guix environment guix' in README....Ludovic Courtès
2015-05-10doc: Mention GNU Make as a requirement....Ludovic Courtès
2015-05-10build: Require Guile >= 2.0.7....Ludovic Courtès