From 9671d37b55f32e3958a3ba3d2f74651347a31219 Mon Sep 17 00:00:00 2001 From: Clint Adams Date: Wed, 13 Nov 2002 21:11:22 +0000 Subject: 17935: beautify bin_whence indentation of () and {} contents. --- Src/text.c | 12 ++++++++---- 1 file changed, 8 insertions(+), 4 deletions(-) (limited to 'Src') diff --git a/Src/text.c b/Src/text.c index d23cccdf6..5084e4558 100644 --- a/Src/text.c +++ b/Src/text.c @@ -339,27 +339,31 @@ gettext2(Estate state) break; case WC_SUBSH: if (!s) { - taddstr("( "); + taddstr("("); tindent++; + taddnl(); n = tpush(code, 1); n->u._subsh.end = state->pc + WC_SUBSH_SKIP(code); } else { state->pc = s->u._subsh.end; tindent--; - taddstr(" )"); + taddnl(); + taddstr(")"); stack = 1; } break; case WC_CURSH: if (!s) { - taddstr("{ "); + taddstr("{"); tindent++; + taddnl(); n = tpush(code, 1); n->u._subsh.end = state->pc + WC_CURSH_SKIP(code); } else { state->pc = s->u._subsh.end; tindent--; - taddstr(" }"); + taddnl(); + taddstr("}"); stack = 1; } break; -- cgit 1.4.1