summaryrefslogtreecommitdiff
path: root/tex/context/base/font-arb.tex
diff options
context:
space:
mode:
Diffstat (limited to 'tex/context/base/font-arb.tex')
-rw-r--r--tex/context/base/font-arb.tex59
1 files changed, 30 insertions, 29 deletions
diff --git a/tex/context/base/font-arb.tex b/tex/context/base/font-arb.tex
index 239ca436e..a75858683 100644
--- a/tex/context/base/font-arb.tex
+++ b/tex/context/base/font-arb.tex
@@ -1,3 +1,16 @@
+%D \module
+%D [ filefile=font-arb,
+%D version=1999.11.06,
+%D title=\CONTEXT\ Font Macros,
+%D subtitle=Arabic,
+%D author=Hans Hagen,
+%D date=\currentdate,
+%D copyright={PRAGMA / Hans Hagen \& Ton Otten}]
+%C
+%C This module is part of the \CONTEXT\ macro||package and is
+%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
+%C details.
+
% NOT YET ADAPTED TO THE NEW FONT MACROS
% I still need to hook in some features into the setup
@@ -10,22 +23,10 @@
% ......
% \stoparabic
-%D \module
-%D [ file=font-arb,
-%D version=1999.11.06,
-%D title=\CONTEXT\ Font Macros,
-%D subtitle=Arabic,
-%D author=Hans Hagen,
-%D date=\currentdate,
-%D copyright={PRAGMA / Hans Hagen \& Ton Otten}]
-%C
-%C This module is part of the \CONTEXT\ macro||package and is
-%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
-%C details.
\writestatus{loading}{Context Font Macros / ArabTeX support}
-%D At the \NTG\ 10\hoog{th} anniversary meeting Klaus Lagally
+%D At the \NTG\ 10\high{th} anniversary meeting Klaus Lagally
%D introduced the audience to arabic typesetting, and after
%D that I knew that some day I really had to look into his
%D generic package. And then, sort of simultaniously Maarten
@@ -50,8 +51,8 @@
\unexpanded\def\setarabicfont#1%
{\scratchdimen=1.2\bodyfontsize
\font\arbfont=\truefontname{Arabic#1} at \currentfontscale\scratchdimen
-\setx@skels
-\newfonttrue
+ \setx@skels
+ \newfonttrue
\arbfont}
%D Just to be compatible with Arab\TEX\ we define:
@@ -81,8 +82,8 @@
{\iffirstargument % \startarab is defined but used already
\getparameters
[\??ARABTEX#1]
- [\c!voor=,\c!na=,\c!binnen=\setarab,
- \c!letter=\setarabfont{Arabic\fontstylesuffix}, % evt ArabicRegular
+ [\c!before=,\c!after=,\c!inner=\setarab,
+ \c!style=\setarabfont{Arabic\fontstylesuffix}, % evt ArabicRegular
#2]%
\expandafter\all@wcmd\csname\e!stop#1\endcsname
\setvalue{\e!start#1}%
@@ -98,7 +99,7 @@
\fi}
\def\initializeARABTEXinternals#1%
- {\getvalue{\??ARABTEX#1\c!binnen}%
+ {\getvalue{\??ARABTEX#1\c!inner}%
\let \\=\ARABTEXbreakA
\let \|=\ARABTEXbreakB
\let \cap=\ARABTEXcap
@@ -117,7 +118,7 @@
\ifnum1<0\getvalue{\??ARABTEX#1\c!n}\relax
\startcolumns
\else
- \getvalue{\??ARABTEX#1\c!voor}%
+ \getvalue{\??ARABTEX#1\c!before}%
\fi
\initializeARABTEXinternals{#1}%
\initializeARABTEXend{#1}%
@@ -125,7 +126,7 @@
\initializeARABTEXalternative{#1}}
\def\initializeARABTEXalternative#1%
- {\getvalue{\??ARABTEX#1\c!letter}}
+ {\getvalue{\??ARABTEX#1\c!style}}
\def\initializeARABTEXend#1% \CONTEXT\ does use \end quite differently
{\long\def\end##1%
@@ -133,7 +134,7 @@
\ifnum1<0\getvalue{\??ARABTEX#1\c!n}\relax
\stopcolumns
\else
- \getvalue{\??ARABTEX#1\c!na}%
+ \getvalue{\??ARABTEX#1\c!after}%
\fi
\endgroup}%
\let\a@l@end\end
@@ -263,23 +264,23 @@
\defineARABTEXalternative
[arabic]
- [\c!binnen=\setarab,
- \c!letter=\setarabfont\fontstylesuffix]
+ [\c!inner=\setarab,
+ \c!style=\setarabfont\fontstylesuffix]
\defineARABTEXalternative
[farsi]
- [\c!binnen=\setfarsi,
- \c!letter=\setarabfont\fontstylesuffix]
+ [\c!inner=\setfarsi,
+ \c!style=\setarabfont\fontstylesuffix]
\defineARABTEXalternative
[urdu]
- [\c!binnen=\seturdu,
- \c!letter=\setarabfont\fontstylesuffix]
+ [\c!inner=\seturdu,
+ \c!style=\setarabfont\fontstylesuffix]
\defineARABTEXalternative
[maghribi]
- [\c!binnen=\setmaghribi,
- \c!letter=\setarabfont\fontstylesuffix]
+ [\c!inner=\setmaghribi,
+ \c!style=\setarabfont\fontstylesuffix]
%D Apart from such definitions, one can adapt the settings
%D using \type {\setupARABTEXalternative}.