44 lines
1.6 KiB
Scheme
44 lines
1.6 KiB
Scheme
|
(define-module (ajatt packages qt)
|
||
|
|
#:use-module (gnu packages perl)
|
||
|
|
#:use-module (gnu packages qt)
|
||
|
|
#:use-module (guix build-system qt)
|
||
|
|
#:use-module (guix download)
|
||
|
|
#:use-module (guix gexp)
|
||
|
|
#:use-module (guix packages)
|
||
|
|
#:use-module (guix search-paths)
|
||
|
|
#:use-module ((guix licenses) #:prefix license:))
|
||
|
|
|
||
|
|
(define qt-url
|
||
|
|
(@@ (gnu packages qt) qt-url))
|
||
|
|
|
||
|
|
(define-public qtspeech
|
||
|
|
(package
|
||
|
|
(inherit qtsvg)
|
||
|
|
(name "qtspeech")
|
||
|
|
(version "6.5.2")
|
||
|
|
(source (origin
|
||
|
|
(method url-fetch)
|
||
|
|
(uri (qt-url name version))
|
||
|
|
(sha256
|
||
|
|
(base32
|
||
|
|
"1cnlc9x0wswzl7j2imi4kvs9zavs4z1mhzzfpwr6d9zlfql9rzw8"))))
|
||
|
|
(arguments
|
||
|
|
(list
|
||
|
|
#:configure-flags #~(list "-DQT_BUILD_TESTS=ON")
|
||
|
|
#:phases
|
||
|
|
#~(modify-phases %standard-phases
|
||
|
|
(add-before 'check 'set-display
|
||
|
|
(lambda _
|
||
|
|
;; Make Qt render "offscreen", required for tests.
|
||
|
|
(setenv "QT_QPA_PLATFORM" "offscreen"))))))
|
||
|
|
(inputs (list qtbase))
|
||
|
|
(native-inputs (list perl qtdeclarative qtmultimedia qtxmlpatterns))
|
||
|
|
(synopsis "Qt Speech module")
|
||
|
|
(description "The Qt Speech module enables a Qt application to support
|
||
|
|
accessibility features such as text-to-speech, which is useful for end-users
|
||
|
|
who are visually challenged or cannot access the application for whatever
|
||
|
|
reason. The most common use case where text-to-speech comes in handy is when
|
||
|
|
the end-user is driving and cannot attend the incoming messages on the phone.
|
||
|
|
In such a scenario, the messaging application can read out the incoming
|
||
|
|
message.")))
|