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 | ce6aeebed4f96c213c8838b3fdeb3427795f8998 (patch) | |
tree | 94a27077b22027c0306888ce59b7e242dfd57408 | |
parent | 6bccfe8a55a12ef162fd945633c130f8b3362529 (diff) | |
download | txr-ce6aeebed4f96c213c8838b3fdeb3427795f8998.tar.gz txr-ce6aeebed4f96c213c8838b3fdeb3427795f8998.tar.bz2 txr-ce6aeebed4f96c213c8838b3fdeb3427795f8998.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)); } |