From 11771b7d3dc47def70bdc784f9fc4dd917366677 Mon Sep 17 00:00:00 2001
From: Dianne Skoll <dianne@skoll.ca>
Date: Sun, 1 Sep 2024 11:27:34 -0400
Subject: [PATCH] Better formatting of ^-- here message for expressions with
 embedded newlines

---
 src/expr.c | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/src/expr.c b/src/expr.c
index a208abac..dae11705 100644
--- a/src/expr.c
+++ b/src/expr.c
@@ -2519,7 +2519,12 @@ expr_node *parse_expression(char const **e, int *r, Var *locals)
         *r == E_ILLEGAL_CHAR) {
         orig = o2;
         while (*orig) {
-            fprintf(ErrFp, "%c", *orig++);
+            if (*orig == '\n') {
+                fprintf(ErrFp, " ");
+                orig++;
+            } else {
+                fprintf(ErrFp, "%c", *orig++);
+            }
         }
         fprintf(ErrFp, "\n");
         orig = o2;