summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2024-05-27 20:22:37 -0700
committerKaz Kylheku <kaz@kylheku.com>2024-05-27 20:22:37 -0700
commitf96d3b8781ee716cff050ca550a9086032c1768c (patch)
tree94a27077b22027c0306888ce59b7e242dfd57408
parent1e78321bcd7838565fb6ea6ecf330db7d2422547 (diff)
downloadtxr-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.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/eval.c b/eval.c
index f63e01a1..1e6e48d5 100644
--- a/eval.c
+++ b/eval.c
@@ -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));
}