me/guix
Archived
1
0
Fork 0
Code Activity

gnu: brltty: Use G-expressions.

Browse source 
* gnu/packages/accessibility.scm (brltty)[arguments]:
Rewrite as G-expressions.
This commit is contained in:
Tobias Geerinckx-Rice 2023-07-16 02:00:01 +02:00
parent 448e75ff9b
commit fdfea4c4ed
No known key found for this signature in database
GPG key ID: 0DB0FF884F556D79
1 changed files with 40 additions and 50 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

44
gnu/packages/accessibility.scm
View file

@ -103,46 +103,36 @@ terminals.")
(base32 "1z54rin4zhg3294pq47gamzjy2c56zfkl07rx2qy2khlpyczds0k")))) (base32 "1z54rin4zhg3294pq47gamzjy2c56zfkl07rx2qy2khlpyczds0k"))))
(build-system glib-or-gtk-build-system) (build-system glib-or-gtk-build-system)
(arguments (arguments
`(#:tests? #f ; No target (list
#:tests? #f ; no target
;; High parallelism may cause errors such as: ;; High parallelism may cause errors such as:
;; ranlib: ./libbrlapi_stubs.a: error reading brlapi_stubs.o: file truncated ;; ranlib: ./libbrlapi_stubs.a: error reading brlapi_stubs.o: file truncated
#:parallel-build? #f #:parallel-build? #f
#:configure-flags #:configure-flags
(list #~(list
(string-append "--with-libbraille=" (string-append "--with-libbraille="
(assoc-ref %build-inputs "libbraille")) #$(this-package-input "libbraille"))
(string-append "--with-espeak_ng=" (string-append "--with-espeak_ng="
(assoc-ref %build-inputs "espeak-ng")) #$(this-package-input "espeak-ng"))
(string-append "--with-espeak=" (string-append "--with-espeak="
(assoc-ref %build-inputs "espeak")) #$(this-package-input "espeak"))
(string-append "--with-flite=" (string-append "--with-flite="
(assoc-ref %build-inputs "flite")) #$(this-package-input "flite"))
;; Required for RUNPATH validation. ;; Required for RUNPATH validation.
(string-append "LDFLAGS=-Wl,-rpath=" (string-append "LDFLAGS=-Wl,-rpath=" #$output "/lib"))
(assoc-ref %outputs "out")
"/lib"))
#:make-flags #:make-flags
(list #~(list
(string-append "JAVA_JAR_DIR=" (string-append "JAVA_JAR_DIR=" #$output)
(assoc-ref %outputs "out")) (string-append "JAVA_JNI_DIR=" #$output)
(string-append "JAVA_JNI_DIR=" (string-append "OCAML_DESTDIR=" #$output "/lib")
(assoc-ref %outputs "out")) (string-append "PYTHON_PREFIX=" #$output)
(string-append "OCAML_DESTDIR="
(assoc-ref %outputs "out")
"/lib")
(string-append "PYTHON_PREFIX="
(assoc-ref %outputs "out"))
"PYTHON_ROOT=/" "PYTHON_ROOT=/"
(string-append "TCL_DIR=" (string-append "TCL_DIR=" #$output "/lib")
(assoc-ref %outputs "out")
"/lib")
"INSTALL_WRITABLE_DIRECTORY=no-thanks") "INSTALL_WRITABLE_DIRECTORY=no-thanks")
#:phases #:phases
(modify-phases %standard-phases #~(modify-phases %standard-phases
(add-after 'unpack 'fix-errors (add-after 'unpack 'fix-errors
(lambda* (#:key outputs #:allow-other-keys) (lambda _
(substitute* "configure" (substitute* "configure"
(("/sbin/ldconfig") (("/sbin/ldconfig")
(which "true"))) (which "true")))
@ -150,7 +140,7 @@ terminals.")
(substitute* "Bindings/Python/setup.py.in" (substitute* "Bindings/Python/setup.py.in"
(("extra_compile_args =") (("extra_compile_args =")
(string-append "extra_link_args = ['-Wl,-rpath=" (string-append "extra_link_args = ['-Wl,-rpath="
(assoc-ref outputs "out") #$output
"/lib'], " "/lib'], "
"extra_compile_args = ")))))))) "extra_compile_args = "))))))))
(native-inputs (native-inputs