summary refs log tree commit diff
diff options
context:
space:
mode:
authorNicolas Goaziou <mail@nicolasgoaziou.fr>2021-12-14 19:09:39 +0100
committerNicolas Goaziou <mail@nicolasgoaziou.fr>2021-12-14 19:09:39 +0100
commit9c5d1bde3d2b659082e6433e979a2f8ee2e6ccfa (patch)
tree696b14cd27bceb4098fe32e49a83035d076cfc1e
parent4558a98389fb00ea06e330d42524b7a0f144df6a (diff)
downloadguix-9c5d1bde3d2b659082e6433e979a2f8ee2e6ccfa.tar.gz
gnu: emacs-auctex: Use new style.
* gnu/packages/emacs-xyz.scm (emacs-auctex)[arguments]<#:phases>: Use
SEARCH-INPUT-FILE.  Remove trailing #T.
[inputs]: Remove labels.
-rw-r--r--gnu/packages/emacs-xyz.scm19
1 files changed, 9 insertions, 10 deletions
diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index 0ed7845724..a06d7a8d8e 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -2621,14 +2621,14 @@ as a library for other Emacs packages.")
                 (search-input-file inputs "/bin/gs")))
              (substitute* "preview.el"
                (("\"dvipng ")
-                (string-append "\"" (assoc-ref inputs "texlive")
-                               "/bin/dvipng "))
+                (let ((dvipng (search-input-file inputs "/bin/dvipng")))
+                  (string-append "\"" dvipng " ")))
                (("\"dvips ")
-                (string-append "\"" (assoc-ref inputs "texlive")
-                               "/bin/dvips "))
+                (let ((dvips (search-input-file inputs "/bin/dvips")))
+                  (string-append "\"" dvips " ")))
                (("\"pdf2dsc ")
-                (string-append "\"" (assoc-ref inputs "ghostscript")
-                               "/bin/pdf2dsc ")))))
+                (let ((pdf2dsc (search-input-file inputs "/bin/pdf2dsc")))
+                  (string-append "\"" pdf2dsc " "))))))
          (add-after 'install 'install-doc
            (lambda* (#:key outputs #:allow-other-keys)
              (let* ((out (assoc-ref outputs "out"))
@@ -2638,13 +2638,12 @@ as a library for other Emacs packages.")
                  (setenv "HOME" (getenv  "TMPDIR")) ; for mktextfm
                  (invoke "pdftex" "tex-ref")
                  (install-file "tex-ref.pdf"
-                               (string-append etc-dir "/refcards")))
-               #t))))))
+                               (string-append etc-dir "/refcards")))))))))
     (native-inputs
      (list perl))
     (inputs
-     `(("ghostscript" ,ghostscript)
-       ("texlive" ,(texlive-updmap.cfg (list texlive-amsfonts)))))
+     (list ghostscript
+           (texlive-updmap.cfg (list texlive-amsfonts))))
     (home-page "https://www.gnu.org/software/auctex/")
     (synopsis "Integrated environment for TeX")
     (description