summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/ptexdir/ptftopl.ch
diff options
context:
space:
mode:
authorPeter Breitenlohner <peb@mppmu.mpg.de>2014-01-23 12:49:22 +0000
committerPeter Breitenlohner <peb@mppmu.mpg.de>2014-01-23 12:49:22 +0000
commitcce7ef6b16baffd93860a40a634d23f8447a4d7e (patch)
treef421a9f4277e2b8587282c496661e5d12a5caf43 /Build/source/texk/web2c/ptexdir/ptftopl.ch
parent2a625df2d1f705b6ba8486a3e93ff161099e88e4 (diff)
web2c: Minor cleanup
git-svn-id: svn://tug.org/texlive/trunk@32767 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/ptexdir/ptftopl.ch')
-rw-r--r--Build/source/texk/web2c/ptexdir/ptftopl.ch9
1 files changed, 4 insertions, 5 deletions
diff --git a/Build/source/texk/web2c/ptexdir/ptftopl.ch b/Build/source/texk/web2c/ptexdir/ptftopl.ch
index 565715d5c29..57dffda83d0 100644
--- a/Build/source/texk/web2c/ptexdir/ptftopl.ch
+++ b/Build/source/texk/web2c/ptexdir/ptftopl.ch
@@ -264,7 +264,7 @@ if file_format<>tfm_format then
tfm_format: print('Ligature/kern ');
@.Ligature/kern starting index...@>
jfm_format,vfm_format: print('Glue/kern ');
-@.Glue/kern index starging index...@>
+@.Glue/kern starting index...@>
end;
print('starting index for character '); print_octal(c);
print_ln(' is too large;'); print_ln('so I removed it.'); reset_tag(c);
@@ -273,9 +273,8 @@ if file_format<>tfm_format then
@x [76] l.1179 - pTeX: if kanji format, output a glue step not a ligature step
else @<Output a ligature step@>;
@y
-else if file_format=tfm_format then @<Output a ligature step@>
-else if (file_format=jfm_format)or(file_format=vfm_format) then
- @<Output a glue step@>;
+else if file_format<>tfm_format then @<Output a glue step@>
+else @<Output a ligature step@>;
@z
@x [78] l.1238 - pTeX:
@@ -435,7 +434,7 @@ else
end;
right;
end;
-end;
+end
@ list the |char_type| table in a similar way to the type table