gnu: emacs-auctex: Configure executable paths.

* gnu/packages/emacs-xyz.scm (emacs-auctex): Configure absolute paths to
ghostscript and texlive executables.
[inputs]: Add ghostscript.
This commit is contained in:
Arun Isaac 2020-08-31 09:33:53 +05:30
parent 36a7af8161
commit 743be81341
No known key found for this signature in database
GPG key ID: 2E25EE8B61802BB3

View file

@ -175,6 +175,7 @@ (define-module (gnu packages emacs-xyz)
#:use-module (gnu packages xdisorg)
#:use-module (gnu packages shells)
#:use-module (gnu packages sqlite)
#:use-module (gnu packages ghostscript)
#:use-module (gnu packages gnupg)
#:use-module (gnu packages video)
#:use-module (gnu packages haskell-xyz)
@ -1914,6 +1915,21 @@ (define-public emacs-auctex
#:exclude '("^tests/" "^latex/README")
#:phases
(modify-phases %standard-phases
(add-after 'unpack 'configure
(lambda* (#:key inputs #:allow-other-keys)
(emacs-substitute-variables "preview.el"
("preview-gs-command"
(string-append (assoc-ref inputs "ghostscript") "/bin/gs")))
(substitute* "preview.el"
(("\"dvipng ")
(string-append "\"" (assoc-ref inputs "texlive")
"/bin/dvipng "))
(("\"dvips ")
(string-append "\"" (assoc-ref inputs "texlive")
"/bin/dvips "))
(("\"pdf2dsc ")
(string-append "\"" (assoc-ref inputs "ghostscript")
"/bin/pdf2dsc ")))))
(add-after 'install 'install-doc
(lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))
@ -1928,7 +1944,8 @@ (define-public emacs-auctex
(native-inputs
`(("perl" ,perl)))
(inputs
`(("texlive" ,(texlive-union (list texlive-amsfonts)))))
`(("ghostscript" ,ghostscript)
("texlive" ,(texlive-union (list texlive-amsfonts)))))
(home-page "https://www.gnu.org/software/auctex/")
(synopsis "Integrated environment for TeX")
(description