guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

01/01: gnu: texlive-bin: Use absolute path to ghostscript executable "gs


From: Arun Isaac
Subject: 01/01: gnu: texlive-bin: Use absolute path to ghostscript executable "gs".
Date: Sun, 17 Jun 2018 12:00:27 -0400 (EDT)

arunisaac pushed a commit to branch master
in repository guix.

commit b4eae997fe5b928f179c34d281e9f2c3eccd3670
Author: Arun Isaac <address@hidden>
Date:   Sat Jun 16 00:53:11 2018 +0530

    gnu: texlive-bin: Use absolute path to ghostscript executable "gs".
    
    * gnu/packages/tex.scm (texlive-bin)[arguments]: Rename fix-unix-detection
    phase to configure-ghostscript-executable. Replace "gs" in epstopdf.pl with
    the absolute path to "gs" in the store.
---
 gnu/packages/tex.scm | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/gnu/packages/tex.scm b/gnu/packages/tex.scm
index b6bc9dd..b290644 100644
--- a/gnu/packages/tex.scm
+++ b/gnu/packages/tex.scm
@@ -176,14 +176,17 @@
                            (string-prefix? "mips64" s))))
       #:phases
        (modify-phases %standard-phases
-         (add-after 'unpack 'fix-unix-detection
+         (add-after 'unpack 'configure-ghostscript-executable
            ;; ps2eps.pl uses the "gswin32c" ghostscript executable on Windows,
            ;; and the "gs" ghostscript executable on Unix. It detects Unix by
            ;; checking for the existence of the /usr/bin directory. Since
            ;; GuixSD does not have /usr/bin, it is also detected as Windows.
-           (lambda _
+           (lambda* (#:key inputs #:allow-other-keys)
              (substitute* "utils/ps2eps/ps2eps-src/bin/ps2eps.pl"
                (("gswin32c") "gs"))
+             (substitute* "texk/texlive/linked_scripts/epstopdf/epstopdf.pl"
+               (("\"gs\"")
+                (string-append "\"" (assoc-ref inputs "ghostscript") 
"/bin/gs\"")))
              #t))
          (add-after 'install 'postint
            (lambda* (#:key inputs outputs #:allow-other-keys #:rest args)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]