From 686df5162d17d976a0aa7eec75fed42fb3e23eee Mon Sep 17 00:00:00 2001
From: Andy Wingo <wingo@pobox.com>
Date: Tue, 15 Jan 2013 15:07:15 +0100
Subject: [PATCH] string->utf8 implementation uses scm_from_utf8_stringn

* libguile/bytevectors.c (UTF_TO_STRING): Use scm_from_utf8_stringn.
---
 libguile/bytevectors.c | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/libguile/bytevectors.c b/libguile/bytevectors.c
index 4ce90ebdf..9093f49c3 100644
--- a/libguile/bytevectors.c
+++ b/libguile/bytevectors.c
@@ -2028,8 +2028,7 @@ SCM_DEFINE (scm_string_to_utf32, "string->utf32",
 		      scm_list_1 (utf), err);				\
   else									\
     {                                                                   \
-      str = scm_from_stringn (c_str, c_strlen, "UTF-8",                 \
-                              SCM_FAILED_CONVERSION_ERROR);             \
+      str = scm_from_utf8_stringn (c_str, c_strlen);                    \
       free (c_str);                                                     \
     }                                                                   \
   return (str);