summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2021-06-17 21:14:50 +0000
committerKarl Berry <karl@freefriends.org>2021-06-17 21:14:50 +0000
commit1c7ff5528e10e989ba7ea7b72182d5f34d4d4e29 (patch)
treee05880f93f4d20fe4d292a1330cff9431091473e
parentaa3339143a1abd3e076aad1231786b3a33dc318f (diff)
\letterspacefont use explicit \fontdimen6 and avoid problem with single-character command
git-svn-id: svn://tug.org/texlive/trunk@59622 c570f23f-e606-0410-a88d-b1316a301751
-rw-r--r--Build/source/texk/web2c/pdftexdir/ChangeLog19
-rw-r--r--Build/source/texk/web2c/pdftexdir/pdftex.web7
2 files changed, 22 insertions, 4 deletions
diff --git a/Build/source/texk/web2c/pdftexdir/ChangeLog b/Build/source/texk/web2c/pdftexdir/ChangeLog
index e5c4b014d49..f364dd9a085 100644
--- a/Build/source/texk/web2c/pdftexdir/ChangeLog
+++ b/Build/source/texk/web2c/pdftexdir/ChangeLog
@@ -1,3 +1,16 @@
+2021-01-04 Thanh Han The <hanthethanh@gmail.com>
+
+ * pdftex.web (letter_space_font): use explicit \fontdimen6 (quad)
+ if specified:
+ https://mailman.ntg.nl/pipermail/ntg-pdftex/2021-June/004335.html
+
+ And avoid problem when single-character command
+ is used with \letterspacefont:
+ https://mailman.ntg.nl/pipermail/ntg-pdftex/2021-June/004336.html
+
+ Both reports from Robert Schlict.
+ (pdftex r853, r854)
+
2021-06-15 Marcel Fabian Krueger <tex@2krueger.de>
* ptexlib.h (glyph_unicode_entry): use integer, not long,
@@ -1500,7 +1513,7 @@
* pdftex.ch (do_extension): Recover variables unused by TeX.
-2009-09-16 Han The Thanh <hanthethanh@gmail.com>
+2009-09-16 Thanh Han The <hanthethanh@gmail.com>
* writettf.c: patch for TTC from Liu Yubao <yubao.liu@gmail.com>
@@ -1538,14 +1551,14 @@
* pdftex.web (sup_dest_names_size): increase to 500000;
test document from Peter Abbott to Karl, 12 Aug 2009 12:24:43.
-2009-07-13 Han The Thanh <hanthethanh@gmail.com>
+2009-07-13 Thanh Han The <hanthethanh@gmail.com>
* mapfile.c: treat TTC fonts as TTF
* writejpg.c: fix bitmap resolution
* writettf.c: fix segfault for certain TTF fonts
* pdftex.web: enable pk generation by default
-2009-06-26 Han The Thanh <hanthethanh@gmail.com>
+2009-06-26 Thanh Han The <hanthethanh@gmail.com>
* pdftex.web: bugfix from Hartmut: fix \pdfobj file {foo} for files
foo that don't end with '\n'
diff --git a/Build/source/texk/web2c/pdftexdir/pdftex.web b/Build/source/texk/web2c/pdftexdir/pdftex.web
index 4ae1f20716f..15f4efaa8ba 100644
--- a/Build/source/texk/web2c/pdftexdir/pdftex.web
+++ b/Build/source/texk/web2c/pdftexdir/pdftex.web
@@ -17641,12 +17641,17 @@ begin
if scan_keyword("nolig") then
set_no_ligatures(k); {disable ligatures for letter-spaced fonts}
nw := height_base[k] - width_base[k];
+
+ if (quad(k) = 0) and (quad(f) > 0) then
+ quad(k) := quad(f);
+ if quad(k) = 0 then
+ pdf_warning("\letterspacefont", "font has zero em size (\fontdimen6)", true, true);
+
for i := 0 to nw - 1 do
font_info[width_base[k] + i].sc :=
font_info[width_base[k] + i].sc + round_xn_over_d(quad(k), e, 1000);
{append, e.g., '+100ls' to font name}
- flush_str(font_name[k]);
str_room(length(font_name[k]) + 7); {|abs(e) <= 1000|}
old_setting := selector;
selector := new_string;