summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--libguile/load.c5
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)
{