[Guile-commits] 01/01: Locale is default port encoding

[Andy Wingo]

wingo pushed a commit to branch master
in repository guile.

commit f23dfc0fb582e2cd2894e9019b66bee53cecf2f9
Author: Andy Wingo <address@hidden>
Date:   Fri Jun 24 07:43:58 2016 +0200

    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(-)

diff --git a/libguile/ports.c b/libguile/ports.c
index c214717..434e48e 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",