From c8fab97da881e56b141295a3e57583bffdc7b09c Mon Sep 17 00:00:00 2001 From: Janneke Nieuwenhuizen Date: Wed, 7 Jun 2023 19:19:01 +0200 Subject: gnu: Add libc-locales-for-target and glibc-locales/hurd. * gnu/packages/base.scm (glibc-locales/hurd): New variable (libc-locales-for-target): Use it in new procedure. (glibc-utf8-locales/hurd): New variable. (libc-utf8-locales-for-target): Use it in new procedure. --- gnu/packages/base.scm | 27 +++++++++++++++++++++++++++ 1 file changed, 27 insertions(+) diff --git a/gnu/packages/base.scm b/gnu/packages/base.scm index 1fdfaf8a57..8cf2682fac 100644 --- a/gnu/packages/base.scm +++ b/gnu/packages/base.scm @@ -77,6 +77,8 @@ #:use-module (srfi srfi-26) #:export (glibc libc-for-target + libc-locales-for-target + libc-utf8-locales-for-target make-ld-wrapper libiconv-if-needed)) @@ -1504,6 +1506,31 @@ command.") (_ glibc))) +(define-public glibc-locales/hurd + (make-glibc-locales glibc/hurd)) + +(define* (libc-locales-for-target #:optional + (target (or (%current-target-system) + (%current-system)))) + (match target + ((? target-hurd?) + glibc-locales/hurd) + (_ + glibc-locales))) + +(define-public glibc-utf8-locales/hurd + (hidden-package + (make-glibc-utf8-locales glibc/hurd))) + +(define* (libc-utf8-locales-for-target #:optional + (target (or (%current-target-system) + (%current-system)))) + (match target + ((? target-hurd?) + glibc-utf8-locales/hurd) + (_ + glibc-utf8-locales))) + (define-public tzdata (package (name "tzdata") -- cgit 1.4.1