From 5322a5d68f01949c068a6632b29d3b57b093edd8 Mon Sep 17 00:00:00 2001 From: Sven Wischnowsky Date: Tue, 25 Sep 2001 12:11:25 +0000 Subject: (15868) --- Src/text.c | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/Src/text.c b/Src/text.c index 9b18a3510..5920c00f6 100644 --- a/Src/text.c +++ b/Src/text.c @@ -274,10 +274,12 @@ gettext2(Estate state) break; case WC_SUBLIST: if (!s) { + if (wc_code(*state->pc) != WC_PIPE) + stack = 1; if (WC_SUBLIST_FLAGS(code) & WC_SUBLIST_NOT) - taddstr("! "); + taddstr(stack ? "!" : "! "); if (WC_SUBLIST_FLAGS(code) & WC_SUBLIST_COPROC) - taddstr("coproc "); + taddstr(stack ? "coproc" : "coproc "); s = tpush(code, (WC_SUBLIST_TYPE(code) == WC_SUBLIST_END)); } else { if (!(stack = (WC_SUBLIST_TYPE(code) == WC_SUBLIST_END))) { -- cgit 1.4.1