fonts-tlwg (4oct17)

git-svn-id: svn://tug.org/texlive/trunk@45469 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 20 insertions, 11 deletions

diff --git a/Master/texmf-dist/source/fonts/fonts-tlwg/latex/lthumpush.fd b/Master/texmf-dist/source/fonts/fonts-tlwg/latex/lthumpush.fd
index 0d9da11fc98..f043cb21977 100644
--- a/Master/texmf-dist/source/fonts/fonts-tlwg/latex/lthumpush.fd
+++ b/Master/texmf-dist/source/fonts/fonts-tlwg/latex/lthumpush.fd
@@ -4,7 +4,7 @@
 %
 % Copyright (C) 1999 National Electronics and Computer Technology Center
 % (NECTEC), Thailand.  All rights reserved.
-% 
+%
 % It may be distributed and/or modified under the
 % conditions of the LaTeX Project Public License, either version 1.3
 % of this license or (at your option) any later version.
@@ -12,26 +12,35 @@
 %   http://www.latex-project.org/lppl.txt
 % and version 1.3 or later is part of all distributions of LaTeX
 % version 2005/12/01 or later.
-% 
+%
 % This work has the LPPL maintenance status "maintained".
-% 
+%
 % The Current Maintainer of this work is Theppitak Karoonboonyanan.
-% 
+%
+% 2017/09/11 Abhabongse Janthong <abhabongse@gmail.com>
+%            - add font scaling
 % 2008/01/21 Theppitak Karoonboonyanan <thep@linux.thai.net>
 %            - first version
 
 \ProvidesFile{lthumpush.fd}[2008/01/21 v1.0 Thai font definitions]
 
+% Check if the scale factor has been defined
+\ifcsname fontstlwg@scale\endcsname
+  \edef\fontstlwg@@scale{s * [\csname fontstlwg@scale\endcsname] }%
+\else
+  \def\fontstlwg@@scale{s * }%
+\fi
+
 % Primary declarations
 \DeclareFontFamily{LTH}{umpush}{}
-\DeclareFontShape{LTH}{umpush}{m}{n}{<->s * umpush}{}
-\DeclareFontShape{LTH}{umpush}{m}{sl}{<->s * umpush_o}{}
+\DeclareFontShape{LTH}{umpush}{m}{n}{<-> \fontstlwg@@scale umpush}{}
+\DeclareFontShape{LTH}{umpush}{m}{sl}{<-> \fontstlwg@@scale umpush_o}{}
 %%%%%%% bold series
-\DeclareFontShape{LTH}{umpush}{b}{n}{<->s * umpush_b}{}
-\DeclareFontShape{LTH}{umpush}{b}{sl}{<->s * umpush_bo}{}
+\DeclareFontShape{LTH}{umpush}{b}{n}{<-> \fontstlwg@@scale umpush_b}{}
+\DeclareFontShape{LTH}{umpush}{b}{sl}{<-> \fontstlwg@@scale umpush_bo}{}
 %%%%%%% light series
-\DeclareFontShape{LTH}{umpush}{l}{n}{<->s * umpush_l}{}
-\DeclareFontShape{LTH}{umpush}{l}{sl}{<->s * umpush_lo}{}
+\DeclareFontShape{LTH}{umpush}{l}{n}{<-> \fontstlwg@@scale umpush_l}{}
+\DeclareFontShape{LTH}{umpush}{l}{sl}{<-> \fontstlwg@@scale umpush_lo}{}
 
 % Substitutions
 \DeclareFontShape{LTH}{umpush}{m}{it}{<->ssub * umpush/m/sl}{}
@@ -43,6 +52,6 @@
 \DeclareFontShape{LTH}{umpush}{bx}{it}{<->ssub * umpush/b/sl}{}
 \endinput
 
-% 
+%
 % EOF
 %