me
/
guix
Archived
1
0
Fork 0

gnu: Add texlive-hyphen-armenian.

* gnu/packages/tex.scm (texlive-hyphen-armenian): New variable.
master
Ricardo Wurmus 2019-07-09 11:53:55 +02:00
parent 619ca0230c
commit a361f4128c
No known key found for this signature in database
GPG Key ID: 197A5888235FACAC
1 changed files with 36 additions and 0 deletions

View File

@ -1385,6 +1385,42 @@ language.")
Greek.")
(license license:lppl1.3+)))
(define-public texlive-hyphen-armenian
(let ((template (texlive-hyphen-package
"texlive-hyphen-armenian" "hy"
(list "/source/generic/hyph-utf8/languages/hy/generate_patterns_hy.rb")
(base32
"0z666y580w1kpxssdanz67ykq257lf11a1mnp1jrn08zijvfrw9c"))))
(package
(inherit template)
(arguments
(substitute-keyword-arguments (package-arguments template)
((#:phases phases)
`(modify-phases ,phases
(add-before 'build 'build-patterns
(lambda _
(let ((target (string-append (getcwd)
"/tex/generic/hyph-utf8/patterns/tex")))
(mkdir-p target)
(with-directory-excursion "source/generic/hyph-utf8/languages/hy/"
(substitute* "generate_patterns_hy.rb"
(("\\$file = File.new.*")
(string-append "$file = File.new(\"" target
"/hyph-hy.tex\",\"w\")\n")))
(invoke "ruby" "generate_patterns_hy.rb"))
#t)))
(add-after 'install 'install-hyph-hy.tex
(lambda* (#:key inputs outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))
(target (string-append out "/share/texmf-dist/tex")))
(copy-recursively "tex" target)
#t)))))))
(synopsis "Hyphenation patterns for Armenian")
(description "The package provides hyphenation patterns for the Armenian
language.")
;; Any version of the LGPL.
(license license:lgpl3+))))
(define-public texlive-hyph-utf8
(package
(inherit (simple-texlive-package