gbranden pushed a commit to branch master
in repository groff.
commit d4425c5610dcbf59472e82b3257012dd39516b72
Author: G. Branden Robinson <[email protected]>
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 <[email protected]>
+
+ * 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 <[email protected]>
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?)
_______________________________________________
Groff-commit mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/groff-commit
