diff options
| -rw-r--r-- | g.tmac | 24 |
1 files changed, 12 insertions, 12 deletions
@@ -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 \& . |