X-Git-Url: https://git.hcoop.net/bpt/guile.git/blobdiff_plain/0d05ae7c4b1eddf6257f99f44eaf5cb7b11191be..f7f4d0477e2f67f0c1248da5d6e64044019196a3:/guile-readline/readline.c

diff --git a/guile-readline/readline.c b/guile-readline/readline.c
index a665415bf..5f6719dd7 100644
--- a/guile-readline/readline.c
+++ b/guile-readline/readline.c
@@ -259,8 +259,8 @@ internal_readline (SCM text)
     {
       scm_t_port *pt = SCM_PTAB_ENTRY (output_port);
       
-      ret = scm_i_from_stringn (s, strlen (s), pt->encoding, 
-                                SCM_FAILED_CONVERSION_ESCAPE_SEQUENCE);
+      ret = scm_from_stringn (s, strlen (s), pt->encoding, 
+                              SCM_FAILED_CONVERSION_ESCAPE_SEQUENCE);
     }
   else 
     ret = SCM_EOF_VAL;