diff options
Diffstat (limited to 'libguile/extensions.c')
-rw-r--r-- | libguile/extensions.c | 10 |
1 files changed, 4 insertions, 6 deletions
diff --git a/libguile/extensions.c b/libguile/extensions.c index c285b1109..a094159d4 100644 --- a/libguile/extensions.c +++ b/libguile/extensions.c @@ -1,6 +1,4 @@ -/* extensions.c - registering and loading extensions. - - Copyright 2001,2006,2009-2011,2018 +/* Copyright 2001,2002,2004,2006,2009-2011,2018-2019 Free Software Foundation, Inc. This file is part of Guile. @@ -93,9 +91,9 @@ load_extension (SCM lib, SCM init) scm_dynwind_begin (0); - clib = scm_to_locale_string (lib); + clib = scm_to_utf8_string (lib); scm_dynwind_free (clib); - cinit = scm_to_locale_string (init); + cinit = scm_to_utf8_string (init); scm_dynwind_free (cinit); for (ext = head; ext; ext = ext->next) @@ -126,7 +124,7 @@ load_extension (SCM lib, SCM init) void scm_c_load_extension (const char *lib, const char *init) { - load_extension (scm_from_locale_string (lib), scm_from_locale_string (init)); + load_extension (scm_from_utf8_string (lib), scm_from_utf8_string (init)); } SCM_DEFINE (scm_load_extension, "load-extension", 2, 0, 0, |