diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2024-05-27 20:22:37 -0700 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2024-05-27 20:22:37 -0700 |
commit | f96d3b8781ee716cff050ca550a9086032c1768c (patch) | |
tree | 94a27077b22027c0306888ce59b7e242dfd57408 | |
parent | 1e78321bcd7838565fb6ea6ecf330db7d2422547 (diff) | |
download | txr-f96d3b8781ee716cff050ca550a9086032c1768c.tar.gz txr-f96d3b8781ee716cff050ca550a9086032c1768c.tar.bz2 txr-f96d3b8781ee716cff050ca550a9086032c1768c.zip |
bugfix: one missing case of fmt_cat separator defaulting.
In a recent commit, the defaulting of the separator in quasiliteral
variable formatting was moved down into the fmt_cat routine.
One stray case remains in subst_vars.
* eval.c (subst_vars): A call to fmt_cat is specifying a separator
value consisting of a single space. This is wrong, preventing
fmt_cat from defaulting it in different ways according to type.
-rw-r--r-- | eval.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -3161,7 +3161,7 @@ val subst_vars(val forms, val env, val filter) pa_123_1(func_n3(eval), env, form)), rest(forms)); } else { - str = fmt_cat(str, lit(" ")); + str = fmt_cat(str, nil); forms = cons(filter_string_tree(filter, str), rest(forms)); } |