diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2022-08-09 06:51:27 -0700 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2022-08-09 06:51:27 -0700 |
commit | 7890fe93a1639ac2e9f8001af5ea6454b659151a (patch) | |
tree | 4957f4dc9153146013106cfdae1402687aa6285e | |
parent | 5dff40875b5200e03fa3db692c035f3d7de56fe7 (diff) | |
download | txr-7890fe93a1639ac2e9f8001af5ea6454b659151a.tar.gz txr-7890fe93a1639ac2e9f8001af5ea6454b659151a.tar.bz2 txr-7890fe93a1639ac2e9f8001af5ea6454b659151a.zip |
listener: bug: history ignored if .txr_profile doesn't exist.
* parser.c (repl): Fix code wrongly checking for the existence
of the .txr_profile file as a condition for loading .txr_history.
It should of course be checking for .txr_history.
-rw-r--r-- | parser.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1616,7 +1616,7 @@ val repl(val bindings, val in_stream, val out_stream, val env) lino_hist_set_max_len(ls, c_num(cdr(hist_len_var), self)); - if (histfile_w && funcall1(pexist_s, rcfile)) { + if (histfile_w && funcall1(pexist_s, histfile)) { if (!funcall1(psafe_s, home)) { report_path_perm_problem(home); } else if (!funcall1(ppriv_s, histfile)) { |