nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

gnu: at-spi2-core: Update to 2.28.0. 

* gnu/packages/gtk.scm (at-spi2-core): Update to 2.28.0.
[build-system]: Use meson-build-system.
[arguments]: Adjust configure-flags; add build phases: set-documentation-path,
prepare-doc-directory, move-documentation; move check phase after install.
[native-inputs]: Add gtk-doc and glib:bin.
master
Ricardo Wurmus 2018-08-05 13:27:40 +02:00
parent 7a1bb44a5d
commit 8c5b884c34
No known key found for this signature in database
GPG Key ID: 197A5888235FACAC
1 changed files with 37 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

49
gnu/packages/gtk.scm
View File

@ -560,7 +560,7 @@ in the GNOME project.")
(define-public at-spi2-core (define-public at-spi2-core
(package (package
(name "at-spi2-core") (name "at-spi2-core")
(version "2.26.2") (version "2.28.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 "/"
@ -568,22 +568,45 @@ in the GNOME project.")
name "-" version ".tar.xz")) name "-" version ".tar.xz"))
(sha256 (sha256
(base32 (base32
"0596ghkamkxgv08r4a1pdhm06qd5zzgcfqsv64038w9xbvghq3n8")))) "11qwdxxx4jm0zj04xydlwah41axiz276dckkiql3rr0wn5x4i8j2"))))
(build-system gnu-build-system) (build-system meson-build-system)
(outputs '("out" "doc")) (outputs '("out" "doc"))
(arguments (arguments
'(#:configure-flags '(#:configure-flags
(list (string-append "--with-html-dir=" (list "-Denable_docs=true")
(assoc-ref %outputs "doc")
"/share/gtk-doc/html"))
#:phases #:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(replace 'check (add-after 'unpack 'set-documentation-path
;; Run test-suite under a dbus session. (lambda* (#:key outputs #:allow-other-keys)
(lambda _ ;; Ensure that the cross-references point to the "doc" output.
;; Don't fail on missing '/etc/machine-id'. (substitute* "doc/libatspi/meson.build"
(setenv "DBUS_FATAL_WARNINGS" "0") (("docpath =.*")
(invoke "dbus-launch" "make" "check")))))) (string-append "docpath = '" (assoc-ref outputs "doc") "/share/gtk-doc/html'\n")))
#t))
(add-before 'install 'prepare-doc-directory
(lambda* (#:key outputs #:allow-other-keys)
(mkdir-p (string-append (assoc-ref outputs "doc") "/share"))
#t))
(add-after 'install 'move-documentation
(lambda* (#:key outputs #:allow-other-keys)
(let ((out (assoc-ref outputs "out"))
(doc (assoc-ref outputs "doc")))
(copy-recursively
(string-append out "/share/gtk-doc")
(string-append doc "/share/gtk-doc"))
(delete-file-recursively
(string-append out "/share/gtk-doc")))
#t))
(add-after 'install 'check
(lambda _
(setenv "HOME" (getenv "TMPDIR")) ; xfconfd requires a writable HOME
;; Run test-suite under a dbus session.
(setenv "XDG_DATA_DIRS" ; for finding org.xfce.Xfconf.service
(string-append %output "/share"))
;; Don't fail on missing '/etc/machine-id'.
(setenv "DBUS_FATAL_WARNINGS" "0") ;
(invoke "dbus-launch" "ninja" "test")))
(delete 'check))))
(propagated-inputs (propagated-inputs
;; atspi-2.pc refers to all these. ;; atspi-2.pc refers to all these.
`(("dbus" ,dbus) `(("dbus" ,dbus)
@ -593,6 +616,8 @@ in the GNOME project.")
("libxtst" ,libxtst))) ("libxtst" ,libxtst)))
(native-inputs (native-inputs
`(("gobject-introspection" ,gobject-introspection) `(("gobject-introspection" ,gobject-introspection)
("gtk-doc" ,gtk-doc)
("glib" ,glib "bin")
("intltool" ,intltool) ("intltool" ,intltool)
("pkg-config" ,pkg-config))) ("pkg-config" ,pkg-config)))
(synopsis "Assistive Technology Service Provider Interface, core components") (synopsis "Assistive Technology Service Provider Interface, core components")