From 9ba449643d4c2ac1d2174befca7d765af222bcc0 Mon Sep 17 00:00:00 2001 From: Michael Gran Date: Sat, 23 Feb 2019 16:19:05 -0800 Subject: [PATCH] Add a fallback value for the locale-monetary-decimal-point * module/ice-9/i18n.scm (locale-monetary-decimal-point): use "." as fallback --- module/ice-9/i18n.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/module/ice-9/i18n.scm b/module/ice-9/i18n.scm index 6b9ead532..319d5a23c 100644 --- a/module/ice-9/i18n.scm +++ b/module/ice-9/i18n.scm @@ -1,7 +1,7 @@ ;;;; i18n.scm --- internationalization support -*- coding: utf-8 -*- ;;;; Copyright (C) 2006, 2007, 2009, 2010, 2012, -;;;; 2017 Free Software Foundation, Inc. +;;;; 2017, 2019 Free Software Foundation, Inc. ;;;; ;;;; This library is free software; you can redistribute it and/or ;;;; modify it under the terms of the GNU Lesser General Public @@ -212,7 +212,7 @@ (define-simple-langinfo-mapping locale-monetary-negative-sign NEGATIVE_SIGN "-") (define-simple-langinfo-mapping locale-monetary-decimal-point - MON_DECIMAL_POINT "") + MON_DECIMAL_POINT ".") (define-simple-langinfo-mapping locale-monetary-thousands-separator MON_THOUSANDS_SEP "") (define-simple-langinfo-mapping locale-monetary-grouping