1 files changed, 5 insertions, 3 deletions
diff --git a/parser.c b/parser.c
index 6caa3a41..5e607fd5 100644
--- a/parser.c
+++ b/parser.c
@@ -640,12 +640,14 @@ val repl(val bindings, val in_stream, val out_stream)
   lino_set_atom_cb(ls, provide_atom, 0);
   lino_set_tempfile_suffix(ls, ".tl");
 
-  if (histfile)
-    lino_hist_load(ls, histfile_u8);
-
   if (rcfile)
     load_rcfile(rcfile);
 
+  lino_hist_set_max_len(ls, c_num(cdr(hist_len_var)));
+
+  if (histfile)
+    lino_hist_load(ls, histfile_u8);
+
   while (!done) {
     val prompt = format(nil, lit("~a> "), counter, nao);
     val prev_counter = counter;