101/452: gnu: texlive-latex-preview -> texlive-preview.

[guix-commits]

ngz pushed a commit to branch tex-team-next
in repository guix.

commit 0e7d0affa0898494ac5760aea5294085a6a7aff2
Author: Nicolas Goaziou <mail@nicolasgoaziou.fr>
AuthorDate: Sun May 14 11:32:53 2023 +0200

    gnu: texlive-latex-preview -> texlive-preview.
    
    * gnu/packages/tex.scm (texlive-preview): New variable.
    (texlive-latex-preview): Deprecate variable.
    * gnu/packages/graphviz.scm (dot2tex)[propagated-inputs]:
    * gnu/packages/sphinx.scm (python-sphinx)[propagated-inputs]: Use new name.
---
 gnu/packages/graphviz.scm |  2 +-
 gnu/packages/sphinx.scm   |  2 +-
 gnu/packages/tex.scm      | 30 ++++++++++++------------------
 3 files changed, 14 insertions(+), 20 deletions(-)

diff --git a/gnu/packages/graphviz.scm b/gnu/packages/graphviz.scm
index 0ca518bc2d..658cc494d1 100644
--- a/gnu/packages/graphviz.scm
+++ b/gnu/packages/graphviz.scm
@@ -390,9 +390,9 @@ graphs in Graphviz's DOT language, written in pure Python.")
            texlive-geometry
            texlive-graphics
            texlive-latex-base
-           texlive-latex-preview
            texlive-pgf
            texlive-pstricks
+           texlive-preview
            texlive-xcolor
            texlive-xkeyval))
     (home-page "https://github.com/kjellmf/dot2tex";)
diff --git a/gnu/packages/sphinx.scm b/gnu/packages/sphinx.scm
index c2d744ed00..4c6d7263dd 100644
--- a/gnu/packages/sphinx.scm
+++ b/gnu/packages/sphinx.scm
@@ -125,7 +125,7 @@
            texlive-latex-needspace
            texlive-oberdiek             ;hypcap
            texlive-parskip
-           texlive-latex-preview
+           texlive-preview
            texlive-tabulary
            texlive-titlesec
            texlive-tools                ;multicol, longtable
diff --git a/gnu/packages/tex.scm b/gnu/packages/tex.scm
index a2a0afdb1c..3c8d431797 100644
--- a/gnu/packages/tex.scm
+++ b/gnu/packages/tex.scm
@@ -8402,27 +8402,19 @@ non-ASCII characters when coding mathematical 
formulae.")
 
 (define-deprecated-package texlive-latex-ucs texlive-ucs)
 
-(define-public texlive-latex-preview
+(define-public texlive-preview
   (package
-    (name "texlive-latex-preview")
+    (name "texlive-preview")
     (version (number->string %texlive-revision))
-    (source (origin
-              (method svn-fetch)
-              (uri (texlive-ref "latex" "preview"))
-              (file-name (string-append name "-" version "-checkout"))
-              (sha256
-               (base32
-                "0hnf821yvki9bzfkz79ns9m1msjp3yvd4dhf3268wrpr1zjx6w8v"))))
+    (source (texlive-origin
+             name version
+             (list "doc/latex/preview/" "source/latex/preview/"
+                   "tex/latex/preview/")
+             (base32
+              "1njw4ziyigmzxky86sh6byn8jjdah51iyd8lkmwx5rxhaqp7snkp")))
+    (outputs '("out" "doc"))
     (build-system texlive-build-system)
-    (arguments
-     '(#:tex-directory "latex/preview"
-       #:phases
-       (modify-phases %standard-phases
-         (add-after 'unpack 'remove-generated-file
-           (lambda _
-             (delete-file "preview.drv")
-             #t)))))
-    (home-page "https://www.ctan.org/pkg/preview";)
+    (home-page "https://ctan.org/pkg/preview";)
     (synopsis "Extract bits of a LaTeX source for output")
     (description
      "The main purpose of the preview package is the extraction of selected
@@ -8434,6 +8426,8 @@ dvipng, but it also works when you are using PDFTeX for 
generating PDF
 files.")
     (license license:gpl3+)))
 
+(define-deprecated-package texlive-latex-preview texlive-preview)
+
 (define-public texlive-acronym
   (let ((template (simple-texlive-package
                    "texlive-acronym"