From 1bc7ef9216c09cbfd464893aea6226ca6fa4849c Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Tue, 31 Jan 2017 23:47:39 +0000 Subject: fontspec support again, tex4ht r238, http://puszcza.gnu.org.ua/bugs/?352 git-svn-id: svn://tug.org/texlive/trunk@43110 c570f23f-e606-0410-a88d-b1316a301751 --- .../tex/generic/tex4ht/usepackage-fontspec.4ht | 105 +++++++++++++++++++++ 1 file changed, 105 insertions(+) create mode 100644 Master/texmf-dist/tex/generic/tex4ht/usepackage-fontspec.4ht (limited to 'Master/texmf-dist/tex/generic/tex4ht/usepackage-fontspec.4ht') diff --git a/Master/texmf-dist/tex/generic/tex4ht/usepackage-fontspec.4ht b/Master/texmf-dist/tex/generic/tex4ht/usepackage-fontspec.4ht new file mode 100644 index 00000000000..37d599e9b0b --- /dev/null +++ b/Master/texmf-dist/tex/generic/tex4ht/usepackage-fontspec.4ht @@ -0,0 +1,105 @@ +% fontspec.4ht (2017-01-31-15:40), generated from tex4ht-4ht.tex +% Copyright 2017 TeX Users Group +% +% This work may be distributed and/or modified under the +% conditions of the LaTeX Project Public License, either +% version 1.3c of this license or (at your option) any +% later version. The latest version of this license is in +% http://www.latex-project.org/lppl.txt +% and version 1.3c or later is part of all distributions +% of LaTeX version 2005/12/01 or later. +% +% This work has the LPPL maintenance status "maintained". +% +% This Current Maintainer of this work +% is the TeX4ht Project . +% +% If you modify this program, changing the +% version identification would be appreciated. +\immediate\write-1{version 2017-01-31-15:40} + +\:dontusepackage{fontenc} +\RequirePackage{expl3} +\append:def\config:opt{,new-accents} +\ExplSyntaxOn +\AtEndOfPackage{% + \tl_gset:Nx \l__fontspec_nfss_enc_tl {T1} + \tl_gset:Nx \g_fontspec_encoding_tl {T1} + \seq_new:N \fontspec_ht_scripts + \seq_new:N \fontspec_ht_fontfamilies + \keys_define:nn {fontspec4ht}{ + Script .code:n = \seq_put_right:Nn \fontspec_ht_scripts {#1} + } +\cs_set:Nn \fontspec_set_family:Nnn + { + % \tl_set:Nn \l__fontspec_family_label_tl { #1 } + % \__fontspec_select_font_family:nn {#2}{#3} + % \tl_set_eq:NN #1 \l_fontspec_family_tl + \def#1{\relax} + } + + +\prg_set_conditional:Nnn \fontspec_if_fontspec_font: {TF,T,F} +{ + \prg_return_false: +} + +\DeclareDocumentCommand \setmainfont { O{} m O{} } + { + % Optional argument can be in both first and third parameter + \keys_set_known:nn {fontspec4ht}{#1} + \keys_set_known:nn {fontspec4ht}{#3} + \seq_put_right:Nn \fontspec_ht_fontfamilies {#2} + \use:x { \exp_not:n { \DeclareRobustCommand \rmfamily } + { + \relax + } + } + \normalfont + \ignorespaces + } + + % define aliases for other user commands +\cs_set_eq:NN \fontspec\setmainfont +\cs_set_eq:NN \setsansfont\setmainfont +\cs_set_eq:NN \setmonofont\setmainfont +\cs_set_eq:NN \setromanfont\setmainfont +\cs_set_eq:NN \setmathrm\setmainfont +\cs_set_eq:NN \setmathsf\setmainfont +\cs_set_eq:NN \setboldmathrm\cs_set_eq:NN +\cs_set_eq:NN \setmatht\cs_set_eq:NN + + + +\DeclareDocumentCommand \newfontfamily { m O{} m O{} } + { + % \fontspec_set_family:cnn { g__fontspec_ \cs_to_str:N #1 _family } {#2} {#3} + \keys_set_known:nn {fontspec4ht}{#4} + \seq_put_right:Nn \fontspec_ht_fontfamilies {#3} + \use:x + { + \exp_not:N \DeclareRobustCommand \exp_not:N #1 + { + \relax + } + } + } + % \tl_set:Nn \g_fontspec_encoding_tl{T1} + % \tl_set_eq:NN \encodingdefault\g_fontspec_encoding_tl + \DeclareDocumentCommand \addfontfeatures {m} + { + \keys_set_known:nn {fontspec4ht}{#1} + \typeout{Add font features} + } + \cs_set_eq:NN \addfontfeature \addfontfeatures + \global\expandafter\let\csname ver@fontenc.sty\endcsname\relax + \global\expandafter\let\csname opt@fontenc.sty\endcsname\relax +} +\ExplSyntaxOff +\edef\TivhTcats{% + \catcode`:=12% + \catcode`@=\the\catcode`@% +} + +\endinput + -- cgit v1.2.3