* readline.c (scm_read_history, scm_write_history): Bugfix: Use

SCM_ROCHARS instead of SCM_CHARS.

diff --git a/libguile/readline.c b/libguile/readline.c
index 1c06893..63150b9 100644 (file)
--- a/libguile/readline.c
+++ b/libguile/readline.c
@@ -271,7 +271,7 @@ scm_read_history (SCM file)
 {
   SCM_ASSERT (SCM_NIMP (file) && SCM_STRINGP (file),
              file, SCM_ARG1, s_read_history);
-  return read_history (SCM_CHARS (file)) ? SCM_BOOL_F : SCM_BOOL_T;
+  return read_history (SCM_ROCHARS (file)) ? SCM_BOOL_F : SCM_BOOL_T;
 }
 
 
@@ -282,7 +282,7 @@ scm_write_history (SCM file)
 {
   SCM_ASSERT (SCM_NIMP (file) && SCM_STRINGP (file),
              file, SCM_ARG1, s_write_history);
-  return write_history (SCM_CHARS (file)) ? SCM_BOOL_F : SCM_BOOL_T;
+  return write_history (SCM_ROCHARS (file)) ? SCM_BOOL_F : SCM_BOOL_T;
 }