From 2e48eceb1ad2b7b33170d7104e94351cc7231e51 Mon Sep 17 00:00:00 2001
From: Peter Stephenson <p.w.stephenson@ntlworld.com>
Date: Fri, 17 Apr 2015 22:43:38 +0100
Subject: 34921: handle error in recursive par_event().

Here documents in an interrupted list caused bad juju.
---
 ChangeLog   | 4 ++++
 Src/parse.c | 1 +
 2 files changed, 5 insertions(+)

diff --git a/ChangeLog b/ChangeLog
index d980558d8..6555883e8 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2015-04-17  Peter Stephenson  <p.w.stephenson@ntlworld.com>
+
+	* 34921: Src/parse.c: handle error in recursive par_event().
+
 2015-04-17  Peter Stephenson  <p.stephenson@samsung.com>
 
 	* 34920: Etc/zsh-development-guide: info on git pull.
diff --git a/Src/parse.c b/Src/parse.c
index 91a81e1ff..985eb8e71 100644
--- a/Src/parse.c
+++ b/Src/parse.c
@@ -605,6 +605,7 @@ par_event(int endtok)
 	if (!par_event(endtok)) {
 	    ecused = oec;
 	    ecbuf[p] |= wc_bdata(Z_END);
+	    return errflag ? 0 : 1;
 	}
     }
     return 1;
-- 
cgit 1.4.1