deri pushed a commit to branch deri-gropdf-ng
in repository groff.
commit 4a2cc772df5bc9af9d2eff72ab1d56910531c8a7
Author: Deri James <[email protected]>
AuthorDate: Wed May 10 16:10:07 2023 +0100
Pass paper dimensions to output drivers (pdf, dvi)
pdf only, and can be oerridden by -p and -l
on cmdline
Comment out change for dvi device
---
tmac/papersize.tmac | 14 ++++++++++++++
1 file changed, 14 insertions(+)
diff --git a/tmac/papersize.tmac b/tmac/papersize.tmac
index 6d5ad14c2..57d763a9f 100644
--- a/tmac/papersize.tmac
+++ b/tmac/papersize.tmac
@@ -123,14 +123,28 @@
. nr paper-w 0
.
. ie d paper-\*[paper-p]-length \{\
+.\" . if '\*[.T]'dvi' \{\
+.\" . ds paper-last \*[paper-\*[paper-p]-width]
+.\" . substring paper-last -1
+.\" . ie '\*[paper-last]'c' \{\
+.\" . as paper-\*[paper-p]-width m
+.\" . as paper-\*[paper-p]-length m
+.\" . \}
+.\" . el \{\
+.\" . as paper-\*[paper-p]-width n
+.\" . as paper-\*[paper-p]-length n
+.\" . \}
+.\" . \}
. ie '\*[paper-l]'l' \{\
. pl \*[paper-\*[paper-p]-width]
. ll (\*[paper-\*[paper-p]-length] - 2i)
+. if '\*[.T]'pdf' .device
papersize=\*[paper-\*[paper-p]-length],\*[paper-\*[paper-p]-width] tmac
. \}
. el \{\
. ie '\*[paper-l]'' \{\
. pl \*[paper-\*[paper-p]-length]
. ll (\*[paper-\*[paper-p]-width] - 2i)
+. if '\*[.T]'pdf' .device
papersize=\*[paper-\*[paper-p]-width],\*[paper-\*[paper-p]-length]
. \}
. el \
. nr paper-w 1
_______________________________________________
Groff-commit mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/groff-commit
