From 0fce2ce618dc74051ada86961d72f4b82392c1dc Mon Sep 17 00:00:00 2001
From: wl <wl>
Date: Wed, 25 Jan 2012 07:10:08 +0000
Subject: * tmac/e.tmac (bl): Make it work inside blocks.

See threads starting with

  http://lists.gnu.org/archive/html/groff/2011-12/msg00055.html
  http://lists.gnu.org/archive/html/groff/2012-01/msg00000.html
---
 tmac/e.tmac | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

(limited to 'tmac/e.tmac')

diff --git a/tmac/e.tmac b/tmac/e.tmac
index 7bd748a4..56f91b41 100644
--- a/tmac/e.tmac
+++ b/tmac/e.tmac
@@ -511,9 +511,14 @@
 .
 .de bl			\" *** contiguous blank lines
 .br
+.@s \\$1
+.sp \\$1
+..
+.
+.de @s			\" --- diversion-surviving space test
 .ne \\$1
 .rs
-.sp \\$1
+.if !'\\n(.z'' \!.@s \\$1
 ..
 .
 .de n1			\" *** line numbering 1
-- 
cgit v1.2.1