me
/
guix
Archived
1
0
Fork 0

gnu: cheese: Update to 3.38.0.

* gnu/packages/gnome.scm (cheese): Update to 3.38.0.
[arguments]: Add phase patch-docbook-xml.
[native-inputs]: Add docbook-xml.

Signed-off-by: Mathieu Othacehe <othacehe@gnu.org>
master
Michael Rohleder 2020-09-22 22:13:31 +02:00 committed by Mathieu Othacehe
parent 89ba5f9479
commit bd64cb68ee
No known key found for this signature in database
GPG Key ID: 8354763531769CA6
1 changed files with 12 additions and 2 deletions

View File

@ -10046,7 +10046,7 @@ photo-booth-like software, such as Cheese.")
(define-public cheese (define-public cheese
(package (package
(name "cheese") (name "cheese")
(version "3.34.0") (version "3.38.0")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append "mirror://gnome/sources/" name "/" (uri (string-append "mirror://gnome/sources/" name "/"
@ -10054,7 +10054,7 @@ photo-booth-like software, such as Cheese.")
version ".tar.xz")) version ".tar.xz"))
(sha256 (sha256
(base32 (base32
"0wvyc9wb0avrprvm529m42y5fkv3lirdphqydc9jw0c8mh05d1ni")))) "0vyim2avlgq3a48rgdfz5g21kqk11mfb53b2l883340v88mp7ll8"))))
(arguments (arguments
`(#:glib-or-gtk? #t `(#:glib-or-gtk? #t
;; Tests require GDK. ;; Tests require GDK.
@ -10067,6 +10067,15 @@ photo-booth-like software, such as Cheese.")
(substitute* "meson_post_install.py" (substitute* "meson_post_install.py"
(("gtk-update-icon-cache") (which "true"))) (("gtk-update-icon-cache") (which "true")))
#t)) #t))
(add-after 'unpack 'patch-docbook-xml
(lambda* (#:key inputs #:allow-other-keys)
;; Avoid a network connection attempt during the build.
(substitute* '("docs/reference/cheese.xml"
"docs/reference/cheese-docs.xml")
(("http://www.oasis-open.org/docbook/xml/4.3/docbookx.dtd")
(string-append (assoc-ref inputs "docbook-xml")
"/xml/dtd/docbook/docbookx.dtd")))
#t))
(add-after 'install 'wrap-cheese (add-after 'install 'wrap-cheese
(lambda* (#:key inputs outputs #:allow-other-keys) (lambda* (#:key inputs outputs #:allow-other-keys)
(let ((out (assoc-ref outputs "out")) (let ((out (assoc-ref outputs "out"))
@ -10077,6 +10086,7 @@ photo-booth-like software, such as Cheese.")
(build-system meson-build-system) (build-system meson-build-system)
(native-inputs (native-inputs
`(("docbook-xsl" ,docbook-xsl) `(("docbook-xsl" ,docbook-xsl)
("docbook-xml" ,docbook-xml-4.3)
("glib:bin" ,glib "bin") ("glib:bin" ,glib "bin")
("gtk-doc" ,gtk-doc) ("gtk-doc" ,gtk-doc)
("intltool" ,intltool) ("intltool" ,intltool)