[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[groff] 02/09: tmac/s.tmac: Permit document to start with .PS.
From: |
G. Branden Robinson |
Subject: |
[groff] 02/09: tmac/s.tmac: Permit document to start with .PS. |
Date: |
Mon, 14 Jun 2021 14:32:26 -0400 (EDT) |
gbranden pushed a commit to branch master
in repository groff.
commit d4425c5610dcbf59472e82b3257012dd39516b72
Author: G. Branden Robinson <g.branden.robinson@gmail.com>
AuthorDate: Mon Jun 14 20:51:30 2021 +1000
tmac/s.tmac: Permit document to start with .PS.
* tmac/s.tmac: Permit document to start with .PS.
(cov*ab-init): Alias PS to @PS.
(PS): Call LP, then re-execute (aliased) self as TS does.
(TS): Update comment to parallel the one in PS.
It would have been nice to be able to do this for .EQ as well, but we
can't; eqnrc calls EQ and EN, and this prevents us from initializing a
post-cover-page environment as .TS and (now) .PS do.
---
ChangeLog | 7 +++++++
tmac/s.tmac | 11 +++++++++--
2 files changed, 16 insertions(+), 2 deletions(-)
diff --git a/ChangeLog b/ChangeLog
index 687be07..ff09150 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+2021-06-14 G. Branden Robinson <g.branden.robinson@gmail.com>
+
+ * tmac/s.tmac: Permit document to start with .PS.
+ (cov*ab-init): Alias PS to @PS.
+ (PS): Call LP, then re-execute (aliased) self as TS does.
+ (TS): Update comment to parallel the one in PS.
+
2021-06-11 Tadziu Hoffmann <hoffmann@usm.uni-muenchen.de>
Fix Savannah #59604. Indent an IP paragraph based on the type
diff --git a/tmac/s.tmac b/tmac/s.tmac
index d89623d..857df76 100644
--- a/tmac/s.tmac
+++ b/tmac/s.tmac
@@ -287,6 +287,7 @@ along with this program. If not, see
<http://www.gnu.org/licenses/>.
.als MC @MC
.als EQ @EQ
.als EN @EN
+.als PS @PS
.als TS @TS
.als AB cov*err-not-after-ab
.als AU par@AU
@@ -1857,7 +1858,7 @@ along with this program. If not, see
<http://www.gnu.org/licenses/>.
.\" This gets called if TS occurs before the first paragraph.
.de TS
.LP
-.\" cov*ab-init aliases TS to @TS
+.\" cov*ab-init, called by LP, aliases TS to @TS.
\\*[TS]\\
..
.de @TS
@@ -1936,8 +1937,14 @@ along with this program. If not, see
<http://www.gnu.org/licenses/>.
.\" ******** module pic ********
.\" ****************************
.\" Pic support.
-.\" PS height width
+.\" This gets called if PS occurs before the first paragraph.
.de PS
+.LP
+.\" cov*ab-init, called by LP, aliases PS to @PS.
+\\*[PS]\\
+..
+.\" @PS height width
+.de @PS
.br
.sp \\n[DD]u
.ie \\n[.$]<2 .@error bad arguments to .PS (not preprocessed with pic?)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [groff] 02/09: tmac/s.tmac: Permit document to start with .PS.,
G. Branden Robinson <=