diff options
author | Andreas Scherer <andreas_tex@freenet.de> | 2020-05-05 16:14:13 +0000 |
---|---|---|
committer | Andreas Scherer <andreas_tex@freenet.de> | 2020-05-05 16:14:13 +0000 |
commit | 88d5f13ac212b295beed6f128c37d7b8e87753c6 (patch) | |
tree | 6b8966a4fa0e8dcecf0690480901e30641312eef /Build/source/texk/web2c/vftovp.ch | |
parent | af9ae578a0fcb6d471ca5703da7a249bc45cc972 (diff) |
Fix section numbering for MFT and VFTOVP.
git-svn-id: svn://tug.org/texlive/trunk@55028 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/vftovp.ch')
-rw-r--r-- | Build/source/texk/web2c/vftovp.ch | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/Build/source/texk/web2c/vftovp.ch b/Build/source/texk/web2c/vftovp.ch index 7db1128a8bb..389255f9c10 100644 --- a/Build/source/texk/web2c/vftovp.ch +++ b/Build/source/texk/web2c/vftovp.ch @@ -268,6 +268,14 @@ default_directory:=default_directory_name; @z @x [44] Don't append `.tfm' here, and keep lowercase. +@ The string |cur_name| is supposed to be set to the external name of the +\.{TFM} file for the current font. This usually means that we need to +prepend the name of the default directory, and +to append the suffix `\.{.TFM}'. Furthermore, we change lower case letters +to upper case, since |cur_name| is a \PASCAL\ string. +@^system dependencies@> + +@<Move font name into the |cur_name| string@>= for k:=1 to name_length do cur_name[k]:=' '; if a=0 then begin for k:=1 to default_directory_name_length do |