diff options
author | Karl Berry <karl@freefriends.org> | 2013-10-12 22:48:28 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2013-10-12 22:48:28 +0000 |
commit | 246b5665edc2af75b55662b748e9ad83f3dac101 (patch) | |
tree | ee34732675812d84422a6593f588e528e3d6fdf2 /Master/texmf-dist/tex/generic/babel/luababel.def | |
parent | 0ec188e4bda5bbce1ca6bb39f8e121f7c47d0adf (diff) |
babel (12oct13)
git-svn-id: svn://tug.org/texlive/trunk@31886 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/generic/babel/luababel.def')
-rw-r--r-- | Master/texmf-dist/tex/generic/babel/luababel.def | 32 |
1 files changed, 32 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/generic/babel/luababel.def b/Master/texmf-dist/tex/generic/babel/luababel.def index ba35d0551bf..c5857c196fc 100644 --- a/Master/texmf-dist/tex/generic/babel/luababel.def +++ b/Master/texmf-dist/tex/generic/babel/luababel.def @@ -108,6 +108,38 @@ \input #1\relax \fi \directlua{processnow = nil}} +\def\babelFSstore#1{% + \bbl@for\bbl@tempa{#1}{% + \edef\bbl@tempb{\noexpand\bbl@FSstore{\bbl@tempa}} + \bbl@tempb{rm}\rmdefault\bbl@save@rmdefault + \bbl@tempb{sf}\sfdefault\bbl@save@sfdefault + \bbl@tempb{tt}\ttdefault\bbl@save@ttdefault}} +\def\bbl@FSstore#1#2#3#4{% + \bbl@csarg\edef{#2default#1}{#3}% + \expandafter\addto\csname extras#1\endcsname{% + \let#4#3% + \ifx#3\f@family + \edef#3{\csname bbl@#2default#1\endcsname}% + \fontfamily{#3}\selectfont + \else + \edef#3{\csname bbl@#2default#1\endcsname}% + \fi}% + \expandafter\addto\csname noextras#1\endcsname{% + \ifx#3\f@family + \fontfamily{#4}\selectfont + \fi + \let#3#4}} +\let\bbl@langfeatures\@empty +\def\babelFSfeatures{% + \let\bbl@ori@fontspec\fontspec + \renewcommand\fontspec[1][]{% + \bbl@ori@fontspec[\bbl@langfeatures##1]} + \let\babelFSfeatures\bbl@FSfeatures + \babelFSfeatures} +\def\bbl@FSfeatures#1#2{% + \expandafter\addto\csname extras#1\endcsname{% + \babel@save\bbl@langfeatures + \edef\bbl@langfeatures{#2,}}} \endinput %% %% End of file `luababel.def'. |