summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAkira Kakuto <kakuto@fuk.kindai.ac.jp>2017-03-12 21:31:16 +0000
committerAkira Kakuto <kakuto@fuk.kindai.ac.jp>2017-03-12 21:31:16 +0000
commit9e769d1a234dcea551d24d67ed988b1eba5fdd4e (patch)
tree7dcedac41e449bb2db337309e80f5978f70c223a
parentfaa1c65dc166f6fd5afcb3e4004fc6b33708b74b (diff)
ptex-base.ch: Fix a typo
git-svn-id: svn://tug.org/texlive/trunk@43475 c570f23f-e606-0410-a88d-b1316a301751
-rw-r--r--Build/source/texk/web2c/ptexdir/ChangeLog5
-rw-r--r--Build/source/texk/web2c/ptexdir/ptex-base.ch4
2 files changed, 7 insertions, 2 deletions
diff --git a/Build/source/texk/web2c/ptexdir/ChangeLog b/Build/source/texk/web2c/ptexdir/ChangeLog
index df3245f487f..1bcf418fb56 100644
--- a/Build/source/texk/web2c/ptexdir/ChangeLog
+++ b/Build/source/texk/web2c/ptexdir/ChangeLog
@@ -1,3 +1,8 @@
+2017-03-12 Akira Kakuto <kakuto@fuk.kindai.ac.jp>
+
+ * ptex-base.ch: Fix a typo pointed out at
+ https://github.com/clerkma/ptex-ng/issues/19.
+
2017-02-05 TANAKA Takuji <ttk@t-lab.opal.ne.jp>
* ppltotf.ch: Expand the limit of glue/kern and kern tables.
diff --git a/Build/source/texk/web2c/ptexdir/ptex-base.ch b/Build/source/texk/web2c/ptexdir/ptex-base.ch
index 3f31f30f89e..7bf3a25f1c6 100644
--- a/Build/source/texk/web2c/ptexdir/ptex-base.ch
+++ b/Build/source/texk/web2c/ptexdir/ptex-base.ch
@@ -554,7 +554,7 @@ distance of the baselineshift between Latin characters and Kanji chatacters.
@d penalty_node=12 {|type| of a penalty node}
@y
@d penalty_node=14 {|type| of a penalty node}
-@d widow_pena=1 {|subtype| of penalty nodes from \.{\\jchrwidowpenalty}}
+@d widow_pena=1 {|subtype| of penalty nodes from \.{\\jcharwidowpenalty}}
@d kinsoku_pena=2 {|subtype| of penalty nodes from kinsoku}
@z
@@ -672,7 +672,7 @@ end
@y
@ @<Display penalty |p|@>=
begin print_esc("penalty "); print_int(penalty(p));
-if subtype(p)=widow_pena then print("(for \jchrwidowpenalty)")
+if subtype(p)=widow_pena then print("(for \jcharwidowpenalty)")
else if subtype(p)=kinsoku_pena then print("(for kinsoku)");
end
@z