summaryrefslogtreecommitdiff
path: root/Build/source/texk
diff options
context:
space:
mode:
authorTakuji Tanaka <ttk@t-lab.opal.ne.jp>2022-04-06 11:55:47 +0000
committerTakuji Tanaka <ttk@t-lab.opal.ne.jp>2022-04-06 11:55:47 +0000
commit865b2eff89886da9a17dfe4c3785d23f302a9b92 (patch)
treefb975f07feefda9e23b7bef75b16ba151389e31a /Build/source/texk
parentf1711850a8fcc8e1b0f2be6b35571bda39dc359a (diff)
dvips: warn if interpreting OFM FONTDIR as pTeX vertical writing
git-svn-id: svn://tug.org/texlive/trunk@62964 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk')
-rw-r--r--Build/source/texk/dvipsk/ChangeLog6
-rw-r--r--Build/source/texk/dvipsk/tfmload.c9
2 files changed, 14 insertions, 1 deletions
diff --git a/Build/source/texk/dvipsk/ChangeLog b/Build/source/texk/dvipsk/ChangeLog
index bfe6e740052..052ceed3248 100644
--- a/Build/source/texk/dvipsk/ChangeLog
+++ b/Build/source/texk/dvipsk/ChangeLog
@@ -1,3 +1,9 @@
+2022-02-27 TANAKA Takuji <ttk@t-lab.opal.ne.jp>
+
+ * tfmload.c:
+ Warn if interpreting OFM FONTDIR as pTeX vertical writing
+ with option -d 4.
+
2022-03-21 Karl Berry <karl@tug.org>
* TL'22 release.
diff --git a/Build/source/texk/dvipsk/tfmload.c b/Build/source/texk/dvipsk/tfmload.c
index 722c9f5ada5..1b354834283 100644
--- a/Build/source/texk/dvipsk/tfmload.c
+++ b/Build/source/texk/dvipsk/tfmload.c
@@ -160,8 +160,15 @@ tfmload(register fontdesctype *curfnt)
for (i=0; i<8; i++) li=tfm32();
if (!noptex && font_level==1 && ec>=0x2E00) {
curfnt->iswide = 1;
- if (li==5) /* interpret FONTDIR RT as pTeX vertical writing */
+ if (li==5) { /* interpret FONTDIR RT as pTeX vertical writing */
curfnt->dir = 9;
+#ifdef DEBUG
+ if (dd(D_FONTS))
+ fprintf_str(stderr,
+ "We will interpret font (%s.ofm) direction as pTeX vertical writing.\n",
+ curfnt->name);
+#endif /* DEBUG */
+ }
}
if (font_level>1 || hd<2 || bc<0 || ec<0 || nw<0
|| bc>ec+1 || ec>65535 || nw>65536)