mirror of
https://git.savannah.gnu.org/git/guix.git
synced 2025-02-07 19:39:34 +01:00
gnu: orca: Update package definition.
* gnu/packages/gnome.scm (orca) [version]: Update to 3.36.3. [source]<origin>[sha256]: Modify base32. [outputs]: New output "help". [arguments]<#:configure-flags>[--with-help-dir]: New flag. <#:phases>['qualify-xkbcomp]: Remove phase. ['wrap-orca]: Modify phase. [inputs]: Add atk, at-spi2-core, brltty, liblouis and python-setproctitle. Remove gsettings-desktop-schemas, gst-plugins-base, gst-plugins-good and xkbcomp. [synopsis]: Modify. [description]: Modify. Signed-off-by: Danny Milosavljevic <dannym@scratchpost.org>
This commit is contained in:
parent
cdc7128b25
commit
d469d8c36f
1 changed files with 32 additions and 33 deletions
|
@ -73,6 +73,7 @@
|
||||||
|
|
||||||
(define-module (gnu packages gnome)
|
(define-module (gnu packages gnome)
|
||||||
#:use-module (gnu packages)
|
#:use-module (gnu packages)
|
||||||
|
#:use-module (gnu packages accessibility)
|
||||||
#:use-module (gnu packages admin)
|
#:use-module (gnu packages admin)
|
||||||
#:use-module (gnu packages aspell)
|
#:use-module (gnu packages aspell)
|
||||||
#:use-module (gnu packages autotools)
|
#:use-module (gnu packages autotools)
|
||||||
|
@ -11709,27 +11710,27 @@ accessibility infrastructure.")
|
||||||
(define-public orca
|
(define-public orca
|
||||||
(package
|
(package
|
||||||
(name "orca")
|
(name "orca")
|
||||||
(version "3.34.1")
|
(version "3.36.3")
|
||||||
(source (origin
|
(source
|
||||||
(method url-fetch)
|
(origin
|
||||||
(uri (string-append
|
(method url-fetch)
|
||||||
"mirror://gnome/sources/" name "/"
|
(uri
|
||||||
(version-major+minor version) "/"
|
(string-append
|
||||||
name "-" version ".tar.xz"))
|
"mirror://gnome/sources/" name "/"
|
||||||
(sha256
|
(version-major+minor version) "/"
|
||||||
(base32
|
name "-" version ".tar.xz"))
|
||||||
"1q38n7hyshkiszmn361skxjynxr31lcms7a1iny6d0zlpmh1vnk4"))))
|
(sha256
|
||||||
|
(base32 "1x0xrcyxlvcjlqp6wcsx5d951i500079wqs04scssjzwqggy330n"))))
|
||||||
(build-system glib-or-gtk-build-system)
|
(build-system glib-or-gtk-build-system)
|
||||||
|
(outputs '("out" "help"))
|
||||||
(arguments
|
(arguments
|
||||||
'(#:phases
|
`(#:configure-flags
|
||||||
|
(list
|
||||||
|
(string-append "--with-help-dir="
|
||||||
|
(assoc-ref %outputs "help")
|
||||||
|
"/share/help"))
|
||||||
|
#:phases
|
||||||
(modify-phases %standard-phases
|
(modify-phases %standard-phases
|
||||||
(add-before 'configure 'qualify-xkbcomp
|
|
||||||
(lambda* (#:key inputs #:allow-other-keys)
|
|
||||||
(let ((xkbcomp (string-append
|
|
||||||
(assoc-ref inputs "xkbcomp") "/bin/xkbcomp")))
|
|
||||||
(substitute* "src/orca/orca.py"
|
|
||||||
(("'xkbcomp'") (format #f "'~a'" xkbcomp))))
|
|
||||||
#t))
|
|
||||||
(add-after 'install 'wrap-orca
|
(add-after 'install 'wrap-orca
|
||||||
(lambda* (#:key outputs #:allow-other-keys)
|
(lambda* (#:key outputs #:allow-other-keys)
|
||||||
(let* ((out (assoc-ref outputs "out"))
|
(let* ((out (assoc-ref outputs "out"))
|
||||||
|
@ -11737,35 +11738,33 @@ accessibility infrastructure.")
|
||||||
(wrap-program prog
|
(wrap-program prog
|
||||||
`("GI_TYPELIB_PATH" ":" prefix
|
`("GI_TYPELIB_PATH" ":" prefix
|
||||||
(,(getenv "GI_TYPELIB_PATH")))
|
(,(getenv "GI_TYPELIB_PATH")))
|
||||||
`("GST_PLUGIN_SYSTEM_PATH" ":" prefix
|
|
||||||
(,(getenv "GST_PLUGIN_SYSTEM_PATH")))
|
|
||||||
`("PYTHONPATH" ":" prefix
|
`("PYTHONPATH" ":" prefix
|
||||||
(,(getenv "PYTHONPATH")))))
|
(,(getenv "PYTHONPATH")))))
|
||||||
#t)))))
|
#t)))))
|
||||||
(native-inputs
|
(native-inputs
|
||||||
`(("intltool" ,intltool)
|
`( ;; ("docbook-utils" ,docbook-utils)
|
||||||
|
("intltool" ,intltool)
|
||||||
("itstool" ,itstool)
|
("itstool" ,itstool)
|
||||||
("pkg-config" ,pkg-config)
|
("pkg-config" ,pkg-config)
|
||||||
("xmllint" ,libxml2)))
|
("xmllint" ,libxml2)))
|
||||||
(inputs
|
(inputs
|
||||||
`(("at-spi2-atk" ,at-spi2-atk)
|
`(("atk" ,atk)
|
||||||
("gsettings-desktop-schemas" ,gsettings-desktop-schemas)
|
("at-spi2-atk" ,at-spi2-atk)
|
||||||
|
("at-spi2-core" ,at-spi2-core)
|
||||||
("gstreamer" ,gstreamer)
|
("gstreamer" ,gstreamer)
|
||||||
("gst-plugins-base" ,gst-plugins-base)
|
|
||||||
("gst-plugins-good" ,gst-plugins-good)
|
|
||||||
("gtk+" ,gtk+)
|
("gtk+" ,gtk+)
|
||||||
|
("liblouis" ,liblouis)
|
||||||
("python" ,python)
|
("python" ,python)
|
||||||
|
("python-brlapi" ,brltty)
|
||||||
|
("python-louis" ,liblouis "python")
|
||||||
("python-pygobject" ,python-pygobject)
|
("python-pygobject" ,python-pygobject)
|
||||||
("python-pyatspi" ,python-pyatspi)
|
("python-pyatspi" ,python-pyatspi)
|
||||||
("python-speechd" ,speech-dispatcher)
|
("python-setproctitle" ,python-setproctitle)
|
||||||
("xkbcomp" ,xkbcomp)))
|
("python-speechd" ,speech-dispatcher)))
|
||||||
(synopsis
|
(synopsis "Screen reader for GNOME")
|
||||||
"Screen reader for individuals who are blind or visually impaired")
|
(description "Orca is a flexible and extensible screen reader that provides
|
||||||
|
access to the graphical desktop via speech and refreshable braille.")
|
||||||
(home-page "https://wiki.gnome.org/Projects/Orca")
|
(home-page "https://wiki.gnome.org/Projects/Orca")
|
||||||
(description
|
|
||||||
"Orca is a screen reader that provides access to the graphical desktop
|
|
||||||
via speech and refreshable braille. Orca works with applications and toolkits
|
|
||||||
that support the Assistive Technology Service Provider Interface (AT-SPI).")
|
|
||||||
(license license:lgpl2.1+)))
|
(license license:lgpl2.1+)))
|
||||||
|
|
||||||
(define-public gspell
|
(define-public gspell
|
||||||
|
|
Loading…
Add table
Reference in a new issue