From d369e7c7a36adbcbd886927825a20ab6fc11782b Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Sun, 26 Jun 2016 21:30:00 -0700 Subject: Separator expression in @(cat) evaluated as Lisp. * match.c (v_cat): Use tleval_144 instead of txeval. --- match.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/match.c b/match.c index af3a0843..8470f29c 100644 --- a/match.c +++ b/match.c @@ -3284,7 +3284,7 @@ static val v_cat(match_files_ctx *c) } else { val existing = tx_lookup_var(sym, c->bindings); if (existing) { - val sep = if3(sep_form, txeval(specline, sep_form, c->bindings), + val sep = if3(sep_form, tleval_144(specline, sep_form, c->bindings), lit(" ")); set(cdr_l(existing), cat_str(flatten(cdr(existing)), sep)); } else { -- cgit v1.2.3