From f23dfc0fb582e2cd2894e9019b66bee53cecf2f9 Mon Sep 17 00:00:00 2001 From: Andy Wingo Date: Fri, 24 Jun 2016 07:43:58 +0200 Subject: Locale is default port encoding * libguile/ports.c (scm_init_ports): Use the locale as the default charset. After the switch to default GUILE_INSTALL_LOCALE=1, this harmonizes the default port encoding with the installed locale. --- libguile/ports.c | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'libguile/ports.c') diff --git a/libguile/ports.c b/libguile/ports.c index c214717c4..434e48e54 100644 --- a/libguile/ports.c +++ b/libguile/ports.c @@ -3979,13 +3979,14 @@ scm_init_ports (void) cur_warnport_fluid = scm_make_fluid (); cur_loadport_fluid = scm_make_fluid (); - /* Use Latin-1 as the default port encoding. */ default_port_encoding_var = scm_c_define ("%default-port-encoding", scm_make_fluid_with_default (SCM_BOOL_F)); default_conversion_strategy_var = scm_c_define ("%default-port-conversion-strategy", scm_make_fluid_with_default (sym_substitute)); + /* Use the locale as the default port encoding. */ + scm_i_set_default_port_encoding (locale_charset ()); scm_c_register_extension ("libguile-" SCM_EFFECTIVE_VERSION, "scm_init_ice_9_ports", -- cgit v1.2.3