me
/
guix
Archived
1
0
Fork 0
Code

gnu: Add ‘libc-locales-for-target’ and related. 

Partly fixes <https://issues.guix.gnu.org/66472>.

This is a followup to 95ea1277ae.

* gnu/packages/base.scm (glibc-locales/hurd): New variable
(libc-locales-for-target): Use it in new procedure.
(libc-utf8-locales-for-target): New procedure.

Co-authored-by: Ludovic Courtès <ludo@gnu.org>
Change-Id: I16e187fcc65a5d4a3b065066b45ef9e45d1875f6
master
Janneke Nieuwenhuizen 2023-06-07 19:19:01 +02:00 committed by Ludovic Courtès
parent ea348b105d
commit 9442b53c6b
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 19 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
gnu/packages/base.scm
View File

@ -76,6 +76,8 @@
#:use-module (srfi srfi-26) #:use-module (srfi srfi-26)
#:export (glibc #:export (glibc
libc-for-target libc-for-target
libc-locales-for-target
libc-utf8-locales-for-target
make-ld-wrapper make-ld-wrapper
libiconv-if-needed libiconv-if-needed
%final-inputs)) %final-inputs))
@ -1526,6 +1528,23 @@ command.")
(_ (_
glibc))) glibc)))
(define-public glibc-locales/hurd
(make-glibc-locales glibc/hurd))
(define* (libc-locales-for-target #:optional
(target (or (%current-target-system)
(%current-system))))
(if (target-hurd? target)
glibc-locales/hurd
glibc-locales))
(define* (libc-utf8-locales-for-target #:optional
(target (or (%current-target-system)
(%current-system))))
(if (target-hurd? target)
glibc-utf8-locales/hurd
glibc-utf8-locales))
(define-public tzdata (define-public tzdata
(package (package
(name "tzdata") (name "tzdata")