me
/
guix
Archived
1
0
Fork 0
Code

guix: texlive importer handles scripts with ".texlua" extension. 

* guix/import/texlive.scm (linked-scripts): Also offer to link scripts with
a ".texlua" extension.
Nicolas Goaziou 2023-07-16 10:46:53 +02:00
parent 985cf777b9
commit 1dc7971429
No known key found for this signature in database
GPG Key ID: DA00B4F048E92F2D
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
guix/import/texlive.scm
View File

@ -298,8 +298,8 @@ When TEXLIVE-ONLY is true, only TeX Live packages are returned."
(define (linked-scripts name package-database)
"Return a list of script names to symlink from \"bin/\" directory for
package NAME according to PACKAGE-DATABASE. Consider as scripts files with
\".lua\", \".pl\", \".py\", \".sh\", \".tcl\", \".tlu\" extensions, and files
without extension."
\".lua\", \".pl\", \".py\", \".sh\", \".tcl\", \".texlua\", \".tlu\"
extensions, and files without extension."
(and-let* ((data (assoc-ref package-database name))
;; Check if binaries are associated to the package.
(depend (assoc-ref data 'depend))
@ -317,7 +317,7 @@ without extension."
(filter-map (lambda (script)
(and (any (lambda (ext)
(member (basename script ext) binaries))
'(".lua" ".pl" ".py" ".sh" ".tcl" ".tlu"))
'(".lua" ".pl" ".py" ".sh" ".tcl" ".texlua" ".tlu"))
(basename script)))
;; Get the right (alphabetic) order.
(reverse scripts))))