diff options
author | Andy Wingo <wingo@pobox.com> | 2016-06-24 07:43:58 +0200 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2016-06-24 07:43:58 +0200 |
commit | f23dfc0fb582e2cd2894e9019b66bee53cecf2f9 (patch) | |
tree | fa39a83d104eff519512909f5fbb65ebfe67afce | |
parent | 8a072fc2d628bc85c7edadc39d50b4ff3a00d6eb (diff) | |
download | guile-f23dfc0fb582e2cd2894e9019b66bee53cecf2f9.tar.gz |
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.
-rw-r--r-- | libguile/ports.c | 3 |
1 files changed, 2 insertions, 1 deletions
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", |