333/421: gnu: texlive-ruhyphen: Refresh package definition.

[guix-commits]

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

commit ef5d71e83faf6d0074f9d3c9be9a6c283c738d96
Author: Nicolas Goaziou <mail@nicolasgoaziou.fr>
AuthorDate: Tue May 16 23:35:16 2023 +0200

    gnu: texlive-ruhyphen: Refresh package definition.
    
    * gnu/packages/tex.scm (texlive-ruhyphen): Remove SIMPLE-TEXLIVE-PACKAGE
    call.
    [arguments]<#:phases>: Remove buggy phase generating only empty files.
    [native-inputs]: Remove COREUTILS, GAWK, SED, GREP, PERL.
---
 gnu/packages/tex.scm | 46 +++++++++++++++-------------------------------
 1 file changed, 15 insertions(+), 31 deletions(-)

diff --git a/gnu/packages/tex.scm b/gnu/packages/tex.scm
index 76d1bb5349..26cc8267e4 100644
--- a/gnu/packages/tex.scm
+++ b/gnu/packages/tex.scm
@@ -3034,39 +3034,23 @@ T2A.")
     (license license:lppl)))
 
 (define-public texlive-ruhyphen
-  (let ((template (simple-texlive-package
-                   "texlive-ruhyphen"
-                   (list "/source/generic/ruhyphen/"
-                         "/tex/generic/ruhyphen/")
-                   (base32
-                    "18n1bqhh8jv765vz3a3fjwffy7m71vhwx9yq8zl0p5j7p72q9qcn")
-                   #:trivial? #t)))
-    (package
-      (inherit template)
-      (arguments
-       (substitute-keyword-arguments (package-arguments template)
-         ((#:phases phases)
-          `(modify-phases ,phases
-             (replace 'build
-               (lambda _
-                 (let ((cwd (getcwd)))
-                   ;; Remove generated files.
-                   (for-each delete-file
-                             (find-files "tex/generic/ruhyphen/"
-                                         "^cyry.*.tex$"))
-                   (substitute* "source/generic/ruhyphen/Makefile"
-                     (("./mkcyryo") (string-append cwd 
"/source/generic/ruhyphen/mkcyryo")))
-                   (with-directory-excursion "tex/generic/ruhyphen"
-                     (invoke "make" "-f"
-                             (string-append cwd 
"/source/generic/ruhyphen/Makefile"))))))))))
-      (native-inputs
-       (list coreutils gawk sed grep perl))
-      (home-page "https://www.ctan.org/pkg/ruhyphen";)
-      (synopsis "Hyphenation patterns for Russian")
-      (description "The package provides a collection of Russian hyphenation
+  (package
+    (name "texlive-ruhyphen")
+    (version (number->string %texlive-revision))
+    (source (texlive-origin
+             name version
+             (list "source/generic/ruhyphen/"
+                   "tex/generic/ruhyphen/")
+             (base32
+              "18n1bqhh8jv765vz3a3fjwffy7m71vhwx9yq8zl0p5j7p72q9qcn")))
+    (build-system texlive-build-system)
+    (arguments (list #:texlive-latex-base #f))
+    (home-page "https://ctan.org/pkg/ruhyphen";)
+    (synopsis "Hyphenation patterns for Russian")
+    (description "The package provides a collection of Russian hyphenation
 patterns supporting a number of Cyrillic font encodings, including T2,
 UCY (Omega Unicode Cyrillic), LCY, LWN (OT2), and koi8-r.")
-      (license license:lppl))))
+    (license license:lppl)))
 
 (define-public texlive-inputenx
   (package