gnome: gnome-desktop: Add bubblewrap as an input.

This is expected to be available, oddly as libseccomp is available.  These
changes fix thumbnails for Nautilus.

* gnu/packages/gnome.scm (gnome-desktop)[arguments]: Add 'patch-bubblewrap
phase.
[inputs]: Add bubblewrap.
This commit is contained in:
Christopher Baines 2020-06-07 21:20:08 +01:00
parent e51175f686
commit 3857aba7ab
No known key found for this signature in database
GPG key ID: 5E28A33B0B84F577

View file

@ -1286,6 +1286,19 @@ (define-public gnome-desktop
(("\"locale\"")
(string-append "\"" libc "/bin/locale\"")))
#t)))
(add-before 'configure 'patch-bubblewrap
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "libgnome-desktop/gnome-desktop-thumbnail-script.c"
(("\"bwrap\",")
(string-append "\"" (which "bwrap") "\","))
(("\"--ro-bind\", \"/usr\", \"/usr\",")
(string-append "\"--ro-bind\", \""
(%store-directory)
"\", \""
(%store-directory)
"\","))
(("\"--ro-bind\", \"/etc/ld.so.cache\", \"/etc/ld.so.cache\",") ""))
#t))
(add-before 'check 'pre-check
(lambda* (#:key inputs #:allow-other-keys)
;; Tests require a running X server and locales.
@ -1315,6 +1328,7 @@ (define-public gnome-desktop
(inputs
`(("gdk-pixbuf" ,gdk-pixbuf)
("glib" ,glib)
("bubblewrap" ,bubblewrap)
("libxext" ,libxext)
("libxkbfile" ,libxkbfile)
("libxrandr" ,libxrandr)))