[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/01: gnu: synfigstudio: Fix crash on opening files.
From: |
Ricardo Wurmus |
Subject: |
01/01: gnu: synfigstudio: Fix crash on opening files. |
Date: |
Wed, 31 May 2017 02:28:32 -0400 (EDT) |
rekado pushed a commit to branch master
in repository guix.
commit ae44ebb90e2abf4867c6ae24556e3129a3069816
Author: Ricardo Wurmus <address@hidden>
Date: Tue May 30 23:56:29 2017 +0200
gnu: synfigstudio: Fix crash on opening files.
* gnu/packages/animation.scm (synfigstudio)[arguments]: Add "wrap-program"
phase.
---
gnu/packages/animation.scm | 13 +++++++++++++
1 file changed, 13 insertions(+)
diff --git a/gnu/packages/animation.scm b/gnu/packages/animation.scm
index cbbfa6e..3c59095 100644
--- a/gnu/packages/animation.scm
+++ b/gnu/packages/animation.scm
@@ -147,8 +147,21 @@ for tweening, preventing the need to hand-draw each
frame.")
(patches
(search-patches "synfigstudio-fix-ui-with-gtk3.patch"))))
(build-system gnu-build-system)
+ (arguments
+ `(#:phases
+ (modify-phases %standard-phases
+ ;; This fixes the file chooser crash that happens with GTK 3.
+ (add-after 'install 'wrap-program
+ (lambda* (#:key inputs outputs #:allow-other-keys)
+ (let* ((out (assoc-ref outputs "out"))
+ (gtk (assoc-ref inputs "gtk+"))
+ (gtk-share (string-append gtk "/share")))
+ (wrap-program (string-append out "/bin/synfigstudio")
+ `("XDG_DATA_DIRS" ":" prefix (,gtk-share)))
+ #t))))))
(inputs
`(("gtkmm" ,gtkmm)
+ ("gtk+" ,gtk+)
("libsigc++" ,libsigc++)
("synfig" ,synfig)))
(native-inputs