gnu: sugar-toolkit-gtk3: Add missing inputs and patch references.

* gnu/packages/sugar.scm (sugar-toolkit-gtk3)[arguments]: Add phase
'patch-references.
[inputs]: Add shared-mime-info and unzip.

Change-Id: Id34b0e8696b655b4788cd5d40b1ca78a5eb34597
This commit is contained in:
Ricardo Wurmus 2024-08-20 17:01:37 +02:00
parent bef48dd553
commit ae748e9ba6
No known key found for this signature in database
GPG key ID: 197A5888235FACAC

View file

@ -23,6 +23,7 @@ (define-module (gnu packages sugar)
#:use-module (gnu packages autotools)
#:use-module (gnu packages base)
#:use-module (gnu packages bash)
#:use-module (gnu packages compression)
#:use-module (gnu packages freedesktop)
#:use-module (gnu packages game-development)
#:use-module (gnu packages gettext)
@ -329,6 +330,23 @@ (define-public sugar-toolkit-gtk3
(substitute* "autogen.sh"
(("^\"\\$srcdir/configure" m)
(string-append "#" m)))))
(add-after 'unpack 'patch-references
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "src/sugar3/eggsmclient-xsmp.c"
(("/bin/rm") (search-input-file inputs "/bin/rm")))
(substitute* "src/sugar3/mime.py"
(("'/usr/local/share/'" m)
(string-append m ", '/run/current-system/profile/share'")))
(substitute* "src/sugar3/bundle/activitybundle.py"
(("'update-mime-database', mime_dir")
(string-append "'"
(search-input-file inputs "/bin/update-mime-database")
"', mime_dir")))
(substitute* "src/sugar3/bundle/bundle.py"
(("'unzip', '-o'")
(string-append "'"
(search-input-file inputs "/bin/unzip")
"', '-o'")))))
(add-after 'glib-or-gtk-wrap 'python-and-gi-wrap
(lambda* (#:key inputs outputs #:allow-other-keys)
(wrap-program (search-input-file outputs "bin/sugar-activity3")
@ -345,7 +363,9 @@ (define-public sugar-toolkit-gtk3
libx11
libxfixes
libxi
python))
python
shared-mime-info
unzip))
(propagated-inputs
;; The gi typelib files are needed by users of this library.
(list gdk-pixbuf