me
/
guix
Archived
1
0
Fork 0
Code

gnu: texlive-babel: Incorporate and remove replacement. 

* gnu/packages/tex.scm (texlive-babel)[replacement]: Remove.
[arguments]: Add 'unchdir' and 'delete-extra-files' phases.
(texlive-babel/fixed): Remove.
master
Ludovic Courtès 2022-05-08 12:02:30 +02:00
parent 3aafcdbd8b
commit cf14b81b7e
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 14 additions and 25 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

39
gnu/packages/tex.scm
View File

@ -3855,8 +3855,6 @@ distribution.")
"0qr5vjp79g1c1l6k173qhfdfabgbky73wymzhm56pazx4a8r08wz"))))
(package
(inherit template)
;; TODO: This package is missing files.
(replacement texlive-babel/fixed)
(arguments
(substitute-keyword-arguments (package-arguments template)
((#:tex-directory _ #t)
@ -3872,6 +3870,20 @@ distribution.")
(substitute* "babel.ins"
(("askonceonly") "askforoverwritefalse"))
#t))
(add-before 'copy-files 'unchdir
(lambda _
(chdir "../../..")))
(add-after 'copy-files 'delete-extra-files
(lambda* (#:key outputs #:allow-other-keys)
(delete-file-recursively
(string-append (assoc-ref outputs "out")
"/share/texmf-dist/source/latex/babel/build"))
(delete-file
(string-append (assoc-ref outputs "out")
"/share/texmf-dist/tex/generic/babel/bbind.ist"))
(delete-file
(string-append (assoc-ref outputs "out")
"/share/texmf-dist/tex/generic/babel/bbglo.ist"))))
(add-after 'install 'install-locales
(lambda* (#:key outputs #:allow-other-keys)
(let ((locale-directory
@ -3894,29 +3906,6 @@ what has to be done for each language. Users of XeTeX are advised to use the
polyglossia package rather than Babel.")
(license license:lppl1.3+))))
(define-public texlive-babel/fixed
(package
(inherit texlive-babel)
(name "texlive-babel-fixed")
(arguments
(substitute-keyword-arguments (package-arguments texlive-babel)
((#:phases phases)
`(modify-phases ,phases
(add-before 'copy-files 'unchdir
(lambda _
(chdir "../../..")))
(add-after 'copy-files 'delete-extra-files
(lambda* (#:key outputs #:allow-other-keys)
(delete-file-recursively
(string-append (assoc-ref outputs "out")
"/share/texmf-dist/source/latex/babel/build"))
(delete-file
(string-append (assoc-ref outputs "out")
"/share/texmf-dist/tex/generic/babel/bbind.ist"))
(delete-file
(string-append (assoc-ref outputs "out")
"/share/texmf-dist/tex/generic/babel/bbglo.ist"))))))))))
(define-deprecated-package texlive-latex-babel texlive-babel)
(define-public texlive-generic-babel-english