summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/babel/xebabel.def
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2014-03-15 21:45:45 +0000
committerKarl Berry <karl@freefriends.org>2014-03-15 21:45:45 +0000
commit29f6ddaf933330468b53bbefab9469f0f893c976 (patch)
tree2aa536ced25a2d7a12a63066a2664b7ac376219e /Master/texmf-dist/tex/generic/babel/xebabel.def
parentcf43dfcdd77a7d15418368470b7a497e036302c6 (diff)
babel (15mar14)
git-svn-id: svn://tug.org/texlive/trunk@33185 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/generic/babel/xebabel.def')
-rw-r--r--Master/texmf-dist/tex/generic/babel/xebabel.def31
1 files changed, 30 insertions, 1 deletions
diff --git a/Master/texmf-dist/tex/generic/babel/xebabel.def b/Master/texmf-dist/tex/generic/babel/xebabel.def
index 77dbf96bea1..e16cc6b6440 100644
--- a/Master/texmf-dist/tex/generic/babel/xebabel.def
+++ b/Master/texmf-dist/tex/generic/babel/xebabel.def
@@ -39,7 +39,7 @@
%% extension .ins) which are part of the distribution.
%% File `bbunicode.dtx'
%% Babel package for LaTeX version 2e
-%% Copyright (C) 2103
+%% Copyright (C) 2103-2014
%% by Javier Bezos
\def\BabelStringsDefault{unicode}
\let\xebbl@stop\relax
@@ -54,6 +54,35 @@
\AddBabelHook{xetex}{stopcommands}{%
\xebbl@stop
\let\xebbl@stop\relax}
+\AddBabelHook{xetex}{loadkernel}{%
+ \begingroup
+ % Reset chars "80-"C0 to category "other", no case mapping:
+ \catcode`\@=11 \count@=128
+ \loop\ifnum\count@<192
+ \global\uccode\count@=0 \global\lccode\count@=0
+ \global\catcode\count@=12 \global\sfcode\count@=1000
+ \advance\count@ by 1 \repeat
+ % Other:
+ \def\O ##1 {%
+ \global\uccode"##1=0 \global\lccode"##1=0
+ \global\catcode"##1=12 \global\sfcode"##1=1000 }%
+ % Letter:
+ \def\L ##1 ##2 ##3 {\global\catcode"##1=11
+ \global\uccode"##1="##2
+ \global\lccode"##1="##3
+ % Uppercase letters have sfcode=999:
+ \ifnum"##1="##3 \else \global\sfcode"##1=999 \fi }%
+ % Letter without case mappings:
+ \def\l ##1 {\L ##1 ##1 ##1 }%
+ \l 00AA
+ \L 00B5 039C 00B5
+ \l 00BA
+ \O 00D7
+ \l 00DF
+ \O 00F7
+ \L 00FF 0178 00FF
+ \endgroup
+ \input #1\relax}
\def\babelFSstore#1{%
\bbl@for\bbl@tempa{#1}{%
\edef\bbl@tempb{\noexpand\bbl@FSstore{\bbl@tempa}}