From 7d29e70c6e039e7ff51ad6908f25f23df13c3964 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?John=20Ankarstr=C3=B6m?= <john@ankarstrom.se>
Date: Sat, 19 Jun 2021 14:57:59 +0200
Subject: Fix ( macro eating line

---
 g.tmac | 24 ++++++++++++------------
 1 file changed, 12 insertions(+), 12 deletions(-)

diff --git a/g.tmac b/g.tmac
index 091d246..f61afc0 100644
--- a/g.tmac
+++ b/g.tmac
@@ -81,11 +81,11 @@
 . _e
 .
 . \" configure footnote environment
-. _e _f \" footnote
+. _E _f \" footnote
 .  evc 0
 .  ps -2p
 .  \" do not change vs!
-. _e
+. _E
 ..
 .
 .\" _ds -- set default string value
@@ -93,8 +93,14 @@
 . if '\*[\$1]'' .ds \$1 \$2
 ..
 .
+.\" _E -- just set environment
+.de _E
+. ev \$1
+..
+.
 .\" _e -- set environment
 .de _e
+. ds _nenv \$1
 .
 . \" initialize document?
 . if '\n(_a'0' \{\
@@ -109,15 +115,9 @@
 .  ev
 . \}
 .
-. \" parse arguments
-. ds _nenv \$1
-. if '\$1'-silent' .ds _nenv \$2
-.
 . \" keep track of previous and new environment
-. if '\$1'-silent' \{\
-.  ds _penv \*[_env]
-.  ds _env \*[_nenv]
-. \}
+. ds _penv \*[_env]
+. ds _env \*[_nenv]
 .
 . \" activate new environment
 . if !'\*[_nenv]'' \{\
@@ -291,7 +291,7 @@ ___________________
 \v'-.3m'\s'\En(.s*80/100'\n(_n\s0\v'.3m'\c
 .
 . \" switch environment and capture footnote
-. _e -silent _f
+. _E _f
 . boxa _n
 \n(_n.
 ..
@@ -301,7 +301,7 @@ ___________________
 . br
 \!.br
 . boxa
-. _e -silent
+. _E
 . ie !'\$1'' \&\$1
 . el \&
 .
-- 
cgit v1.2.3