diff options
Diffstat (limited to 'libguile/load.c')
-rw-r--r-- | libguile/load.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/libguile/load.c b/libguile/load.c index cec59d1a9..082bebb3d 100644 --- a/libguile/load.c +++ b/libguile/load.c @@ -105,8 +105,9 @@ SCM_DEFINE (scm_primitive_load, "primitive-load", 1, 0, 0, if (encoding) scm_i_set_port_encoding_x (port, encoding); else - /* The file has no encoding declared. We'll presume Latin-1. */ - scm_i_set_port_encoding_x (port, NULL); + /* The file has no encoding declared. We'll presume UTF-8, like + compile-file does. */ + scm_i_set_port_encoding_x (port, "UTF-8"); while (1) { |