terminate option list with NULL.

[bpt/guile.git] / guile-readline / readline.c

diff --git a/guile-readline/readline.c b/guile-readline/readline.c
index 4a87ae2..4d2be73 100644 (file)
--- a/guile-readline/readline.c
+++ b/guile-readline/readline.c
@@ -65,7 +65,6 @@ SCM_DEFINE (scm_readline_options, "readline-options-interface", 0, 1, 0,
 {
   SCM ans = scm_options (setting,
                         scm_readline_opts,
-                        SCM_N_READLINE_OPTIONS,
                         FUNC_NAME);
   stifle_history (SCM_HISTORY_LENGTH);
   return ans;
@@ -574,8 +573,7 @@ scm_init_readline ()
 
   reentry_barrier_mutex = scm_permanent_object (scm_make_mutex ());
   scm_init_opts (scm_readline_options,
-                scm_readline_opts,
-                SCM_N_READLINE_OPTIONS);
+                scm_readline_opts);
   init_bouncing_parens();
   scm_add_feature ("readline");
 #endif /* HAVE_RL_GETC_FUNCTION */